Fix racket codegen

Need a require to get the system function
This commit is contained in:
Edwin Brady 2020-03-31 22:40:09 +01:00
parent e027e0c434
commit fb22e3de73

View File

@ -33,6 +33,7 @@ schHeader : String -> String
schHeader libs schHeader libs
= "#lang racket/base\n" ++ = "#lang racket/base\n" ++
"(require racket/promise)\n" ++ -- for force/delay "(require racket/promise)\n" ++ -- for force/delay
"(require racket/system)\n" ++ -- for system
"(require rnrs/bytevectors-6)\n" ++ -- for buffers "(require rnrs/bytevectors-6)\n" ++ -- for buffers
"(require rnrs/io/ports-6)\n" ++ -- for file handling "(require rnrs/io/ports-6)\n" ++ -- for file handling
"(require ffi/unsafe ffi/unsafe/define)\n" ++ -- for calling C "(require ffi/unsafe ffi/unsafe/define)\n" ++ -- for calling C