aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/scheme
diff options
context:
space:
mode:
authorEduardo Julian2018-07-03 20:35:42 -0400
committerEduardo Julian2018-07-03 20:35:42 -0400
commit371a407a49ddf0f2fe1d977018fcd0a009c86043 (patch)
tree322daf75a391bfc49026867250e10c424c4ec978 /new-luxc/source/luxc/lang/translation/scheme
parentc75e8aa8bc84af3b598292f3261354384b3cc80f (diff)
- Re-named "import" to "import:".
Diffstat (limited to '')
-rw-r--r--new-luxc/source/luxc/lang/translation/scheme.lux16
-rw-r--r--new-luxc/source/luxc/lang/translation/scheme/eval.jvm.lux24
2 files changed, 20 insertions, 20 deletions
diff --git a/new-luxc/source/luxc/lang/translation/scheme.lux b/new-luxc/source/luxc/lang/translation/scheme.lux
index af3208414..44a5808cb 100644
--- a/new-luxc/source/luxc/lang/translation/scheme.lux
+++ b/new-luxc/source/luxc/lang/translation/scheme.lux
@@ -28,26 +28,26 @@
[No-Anchor]
)
-(host.import java/lang/Object)
+(host.import: java/lang/Object)
-(host.import java/lang/String
+(host.import: java/lang/String
(getBytes [String] #try (Array byte)))
-(host.import java/lang/CharSequence)
+(host.import: java/lang/CharSequence)
-(host.import java/lang/Appendable
+(host.import: java/lang/Appendable
(append [CharSequence] Appendable))
-(host.import java/lang/StringBuilder
+(host.import: java/lang/StringBuilder
(new [])
(toString [] String))
-(host.import gnu/mapping/Environment)
+(host.import: gnu/mapping/Environment)
-(host.import gnu/expr/Language
+(host.import: gnu/expr/Language
(eval [String] #try #? Object))
-(host.import kawa/standard/Scheme
+(host.import: kawa/standard/Scheme
(#static getR7rsInstance [] Scheme))
(type: #export Anchor [Text Register])
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))