diff options
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/scheme')
| -rw-r--r-- | new-luxc/source/luxc/lang/translation/scheme/eval.jvm.lux | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/new-luxc/source/luxc/lang/translation/scheme/eval.jvm.lux b/new-luxc/source/luxc/lang/translation/scheme/eval.jvm.lux index 72c58587c..cbdd43d94 100644 --- a/new-luxc/source/luxc/lang/translation/scheme/eval.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/scheme/eval.jvm.lux @@ -23,40 +23,40 @@ [invalid-variant] ) -(host.import java/lang/Object +(host.import: java/lang/Object (toString [] String) (getClass [] (Class Object))) -(host.import java/lang/Long +(host.import: java/lang/Long (intValue [] Integer)) -(host.import java/lang/Boolean) -(host.import java/lang/String) +(host.import: java/lang/Boolean) +(host.import: java/lang/String) -(host.import gnu/math/IntNum +(host.import: gnu/math/IntNum (longValue [] long)) -(host.import gnu/math/DFloNum +(host.import: gnu/math/DFloNum (doubleValue [] double)) -(host.import (gnu/lists/FVector E) +(host.import: (gnu/lists/FVector E) (getBufferLength [] int) (get [int] E)) -(host.import gnu/lists/EmptyList) +(host.import: gnu/lists/EmptyList) -(host.import gnu/lists/FString +(host.import: gnu/lists/FString (toString [] String)) -(host.import gnu/lists/Pair +(host.import: gnu/lists/Pair (getCar [] Object) (getCdr [] Object) (get [int] Object)) -(host.import gnu/mapping/Symbol +(host.import: gnu/mapping/Symbol (getName [] String)) -(host.import gnu/mapping/SimpleSymbol) +(host.import: gnu/mapping/SimpleSymbol) (def: (parse-tuple lux-object host-object) (-> (-> Object (Error Any)) (FVector Object) (Error Any)) |