summaryrefslogtreecommitdiffstats
path: root/tests/160-datatype.sml
diff options
context:
space:
mode:
Diffstat (limited to 'tests/160-datatype.sml')
-rw-r--r--tests/160-datatype.sml5
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/160-datatype.sml b/tests/160-datatype.sml
new file mode 100644
index 0000000..7514606
--- /dev/null
+++ b/tests/160-datatype.sml
@@ -0,0 +1,5 @@
+datatype D = D of int
+
+fun f (D x) = __builtin "exit" x
+
+val _ = f (D 42)