diff options
author | Adam Chlipala <adamc@hcoop.net> | 2009-04-09 15:51:50 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2009-04-09 15:51:50 -0400 |
commit | ba104e31d3576e661c8b8db1b7e9ca5505002430 (patch) | |
tree | 2d45f102c6188d4cb76be3db82a7af51384ee5b4 | |
parent | 8f29d5ead0c09b99291f729001e6aabd24d8aa8c (diff) |
Use FOREIGN KEY in Tree demo
-rw-r--r-- | demo/tree.ur | 3 |
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 |