diff options
Diffstat (limited to 'tests/120-case-int.sml')
| -rw-r--r-- | tests/120-case-int.sml | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/120-case-int.sml b/tests/120-case-int.sml new file mode 100644 index 0000000..98967e4 --- /dev/null +++ b/tests/120-case-int.sml @@ -0,0 +1,5 @@ +val _ = + case 18 of + 17 => __builtin "exit" 41 + | 18 => __builtin "exit" 42 + | _ => __builtin "exit" 43 |