diff options
Diffstat (limited to 'tests/24-functor.sml')
| -rw-r--r-- | tests/24-functor.sml | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/tests/24-functor.sml b/tests/24-functor.sml deleted file mode 100644 index d18337e..0000000 --- a/tests/24-functor.sml +++ /dev/null @@ -1,17 +0,0 @@ -signature MagicNumber = sig - val n : int -end - -functor Exiter(N : MagicNumber) = struct - fun exit _ = __builtin "exit" N.n -end - -structure FourtyTwo = struct - val a = 16 - val n = 42 - val z = 38 -end - -structure FourtyTwoExiter = Exiter(FourtyTwo) - -val _ = FourtyTwoExiter.exit () |