Add flags needed for pffi to kawa

This commit is contained in:
retropikzel 2025-04-19 15:10:10 +03:00
parent cd5090874c
commit 3e6d37c746
2 changed files with 11 additions and 2 deletions

View File

@ -83,6 +83,7 @@ as compiler.
- kawa
- interpreter
- R7RS
- Native access is enabled by default so pffi can work
- larceny
- interpreter
- R6RS

View File

@ -277,15 +277,23 @@
(apply string-append
`("kawa"
" "
,(util-getenv "COMPILE_R7RS_KAWA")
"-J--add-exports=java.base/jdk.internal.foreign.abi=ALL-UNNAMED"
" "
"--r7rs"
"-J--add-exports=java.base/jdk.internal.foreign.layout=ALL-UNNAMED"
" "
"-J--add-exports=java.base/jdk.internal.foreign=ALL-UNNAMED"
" "
"-J--enable-native-access=ALL-UNNAMED"
" "
,(util-getenv "COMPILE_R7RS_KAWA")
" "
"-Dkawa.import.path="
,@(map (lambda (item)
(string-append item "/*.sld:"))
(append prepend-directories append-directories))
" "
"--r7rs"
" "
,input-file)))))
(larceny
(type . interpreter)