diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/20-structure.sml | 5 | ||||
| -rw-r--r-- | tests/21-struct-datatype.sml | 6 |
2 files changed, 11 insertions, 0 deletions
diff --git a/tests/20-structure.sml b/tests/20-structure.sml new file mode 100644 index 0000000..dfc7b9b --- /dev/null +++ b/tests/20-structure.sml @@ -0,0 +1,5 @@ +structure S = struct + val fourtyTwo = 42 +end + +val _ = __builtin "exit" S.fourtyTwo 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 |