1
0
mirror of https://github.com/janet-lang/janet synced 2025-11-03 09:03:02 +00:00

Add sysir test suite stub

This commit is contained in:
Calvin Rose
2025-04-13 07:47:52 -05:00
parent c9305a0a42
commit 862b4e9688
4 changed files with 68 additions and 21 deletions

View File

@@ -0,0 +1,16 @@
(use ./frontend)
(defn-external printf:int [fmt:pointer])
(defn-external exit:void [x:int])
(defsys _start:void []
(printf "hello, world!\n")
(exit (the int 0))
(return))
(defn main [& args]
(def [_ what] args)
(eprint "MODE: " what)
(case what
"c" (dumpc)
"x64" (dumpx64)))