summaryrefslogtreecommitdiff
path: root/test/coq/pass
diff options
context:
space:
mode:
authorBrian Campbell2018-06-07 18:00:59 +0100
committerBrian Campbell2018-06-08 15:03:37 +0100
commit7cdbee76d454047271ef6cdaa82a2b7e2ed590ba (patch)
treec0f6e3843758e009551c9de53afbe227ed3df31f /test/coq/pass
parentdda8dd8689ea4756c41a5bb36a123b564dfb0b12 (diff)
Coq: add destructuring of atom existentials in patterns
Plus test case, broken builtin name
Diffstat (limited to 'test/coq/pass')
-rw-r--r--test/coq/pass/exatom.sail9
1 files changed, 9 insertions, 0 deletions
diff --git a/test/coq/pass/exatom.sail b/test/coq/pass/exatom.sail
new file mode 100644
index 00000000..db162536
--- /dev/null
+++ b/test/coq/pass/exatom.sail
@@ -0,0 +1,9 @@
+$include <prelude.sail>
+
+val f : forall 'n, 'n in {8,16}. atom('n) -> atom('n)
+
+val make : unit -> {'n, 'n in {8,16}. atom('n)}
+
+val test : {'n, 'n in {8,16}. atom('n)} -> int
+
+function test(v) = f(v)