diff options
author | Adam Chlipala <adamc@hcoop.net> | 2009-04-09 13:59:34 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2009-04-09 13:59:34 -0400 |
commit | b167bec378ae4577ba2994e0621bf01a44832d34 (patch) | |
tree | ff692444e26cba80b8c5b19ad5be21a85cbf563c /src/urweb.grm | |
parent | a75aaa90b3b827f9ef002491bc081df36260f136 (diff) |
More flexible foreign keying
Diffstat (limited to 'src/urweb.grm')
-rw-r--r-- | src/urweb.grm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/urweb.grm b/src/urweb.grm index 16a77150..50fb6cb3 100644 --- a/src/urweb.grm +++ b/src/urweb.grm @@ -523,6 +523,7 @@ cst : UNIQUE tnames (let val e = (ECApp (e, nm2), loc) val e = (EDisjointApp e, loc) val e = (EDisjointApp e, loc) + val e = (EApp (e, (EWild, loc)), loc) in (EApp (e, mat), loc) end) |