diff options
Diffstat (limited to 'lux-scheme/source/program.lux')
| -rw-r--r-- | lux-scheme/source/program.lux | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lux-scheme/source/program.lux b/lux-scheme/source/program.lux index 5ffdcf74b..3371bb506 100644 --- a/lux-scheme/source/program.lux +++ b/lux-scheme/source/program.lux @@ -85,7 +85,7 @@ (ffi.import: gnu/math/IntNum ["#::." - (new #manual [int]) + (new "manual" [int]) (longValue [] long)]) (ffi.import: gnu/math/DFloNum @@ -107,7 +107,7 @@ (ffi.import: gnu/lists/EmptyList ["#::." - (#static emptyList gnu/lists/EmptyList)]) + ("static" emptyList gnu/lists/EmptyList)]) (ffi.import: (gnu/lists/FVector E) ["#::." @@ -118,18 +118,18 @@ (ffi.import: gnu/mapping/Procedure ["#::." - (apply2 [java/lang/Object java/lang/Object] #try java/lang/Object) - (applyN [[java/lang/Object]] #try java/lang/Object)]) + (apply2 [java/lang/Object java/lang/Object] "try" java/lang/Object) + (applyN [[java/lang/Object]] "try" java/lang/Object)]) (ffi.import: gnu/mapping/Environment) (ffi.import: gnu/expr/Language ["#::." - (eval [java/lang/String] #try java/lang/Object)]) + (eval [java/lang/String] "try" java/lang/Object)]) (ffi.import: kawa/standard/Scheme ["#::." - (#static getR7rsInstance [] kawa/standard/Scheme)]) + ("static" getR7rsInstance [] kawa/standard/Scheme)]) (def: (variant? value) (-> Any Bit) |