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 /demo/tree.ur | |
| parent | 8f29d5ead0c09b99291f729001e6aabd24d8aa8c (diff) | |
Use FOREIGN KEY in Tree demo
Diffstat (limited to 'demo/tree.ur')
| -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 |