summaryrefslogtreecommitdiff
path: root/ccross.sml
diff options
context:
space:
mode:
authorVladimir Azarov <avm@intermediate-node.net>2025-04-04 18:24:46 +0200
committerVladimir Azarov <avm@intermediate-node.net>2025-04-04 18:24:46 +0200
commit7b29b31648fd737e7bbc007f480b799add91bc6b (patch)
treee724c15c959d98ece73c186b82a61100f4e8d06a /ccross.sml
parentd7d4830443f1e385af862462f976553c8a9033e1 (diff)
Beginning of the preprocessor
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 ()