aboutsummaryrefslogtreecommitdiffhomepage
path: root/demo/tree.ur
diff options
context:
space:
mode:
Diffstat (limited to 'demo/tree.ur')
-rw-r--r--demo/tree.ur3
1 files changed, 2 insertions, 1 deletions
diff --git a/demo/tree.ur b/demo/tree.ur
index 99f93011..b02e1f00 100644
--- a/demo/tree.ur
+++ b/demo/tree.ur
@@ -1,6 +1,7 @@
sequence s
table t : { Id : int, Parent : option int, Nam : string }
- PRIMARY KEY Id
+ PRIMARY KEY Id,
+ CONSTRAINT F FOREIGN KEY Parent REFERENCES t (Id) ON DELETE CASCADE
open TreeFun.Make(struct
val tab = t