spl/spl/assemble.spl

14 lines
265 B
Text

func main { mega | with args ;
args:len 3 gt if {
3 args:get "isbpl" eq if {
"const str import-isbpl" println
"#isbpl.spl" println
"end import-isbpl" println
"call import" println
}
}
def file 2 args:get =file
file write-file-sasm println
0
}