X-Git-Url: http://git.joshuawise.com/snipe.git/blobdiff_plain/0a24e44d4e9f82f8d3d83de8e58c83c8cf2868b6..6ade8b0a3251e44b34c6bdbbd9403e36d6fd6231:/top/top_mlton.sml

diff --git a/top/top_mlton.sml b/top/top_mlton.sml
new file mode 100644
index 0000000..3f6ea30
--- /dev/null
+++ b/top/top_mlton.sml
@@ -0,0 +1,5 @@
+val _ =
+  OS.Process.exit
+    (Top.main
+      (CommandLine.name (), CommandLine.arguments ())
+    )