summaryrefslogtreecommitdiff
path: root/src/urweb.grm
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-04-09 13:59:34 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-04-09 13:59:34 -0400
commitb167bec378ae4577ba2994e0621bf01a44832d34 (patch)
treeff692444e26cba80b8c5b19ad5be21a85cbf563c /src/urweb.grm
parenta75aaa90b3b827f9ef002491bc081df36260f136 (diff)
More flexible foreign keying
Diffstat (limited to 'src/urweb.grm')
-rw-r--r--src/urweb.grm1
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)