12 lines
330 B
Plaintext
12 lines
330 B
Plaintext
|
(with_import "./wasm.kp"
|
||
|
|
(let (
|
||
|
|
_ (println "args" *ARGV*)
|
||
|
|
(_ _ in out) (cond (!= (len *ARGV*) 4) (error "wrong number of params")
|
||
|
|
true *ARGV*)
|
||
|
|
_ (println "in" in "out" out)
|
||
|
|
wasm_code [
|
||
|
|
]
|
||
|
|
_ (write_file out (wasm_to_binary wasm_code))
|
||
|
|
return_code 0
|
||
|
|
) return_code ))
|