summaryrefslogtreecommitdiff
path: root/ccross.sml
diff options
context:
space:
mode:
Diffstat (limited to 'ccross.sml')
-rw-r--r--ccross.sml4
1 files changed, 4 insertions, 0 deletions
diff --git a/ccross.sml b/ccross.sml
new file mode 100644
index 0000000..58f9c32
--- /dev/null
+++ b/ccross.sml
@@ -0,0 +1,4 @@
+fun main [fname] = Cpp.debugPrint fname
+ | main _ = printLn "Expected a single argument: file name"
+
+val () = main $ CommandLine.arguments ()