summaryrefslogtreecommitdiffstats
path: root/tests/21-struct-datatype.sml
diff options
context:
space:
mode:
Diffstat (limited to 'tests/21-struct-datatype.sml')
-rw-r--r--tests/21-struct-datatype.sml6
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/21-struct-datatype.sml b/tests/21-struct-datatype.sml
new file mode 100644
index 0000000..ab714ea
--- /dev/null
+++ b/tests/21-struct-datatype.sml
@@ -0,0 +1,6 @@
+structure S = struct
+ datatype D = D of int
+end
+
+val S.D x = S.D 42
+val _ = __builtin "exit" x