aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/common-lisp
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/common-lisp
parentc75e8aa8bc84af3b598292f3261354384b3cc80f (diff)
- Re-named "import" to "import:".
Diffstat (limited to '')
-rw-r--r--new-luxc/source/luxc/lang/translation/common-lisp.lux12
-rw-r--r--new-luxc/source/luxc/lang/translation/common-lisp/eval.jvm.lux24
-rw-r--r--new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux2
3 files changed, 19 insertions, 19 deletions
diff --git a/new-luxc/source/luxc/lang/translation/common-lisp.lux b/new-luxc/source/luxc/lang/translation/common-lisp.lux
index 4341e5e4c..d407ae7ab 100644
--- a/new-luxc/source/luxc/lang/translation/common-lisp.lux
+++ b/new-luxc/source/luxc/lang/translation/common-lisp.lux
@@ -28,21 +28,21 @@
[No-Anchor]
)
-(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 org/armedbear/lisp/LispObject)
+(host.import: org/armedbear/lisp/LispObject)
-(host.import org/armedbear/lisp/Interpreter
+(host.import: org/armedbear/lisp/Interpreter
(#static getInstance [] Interpreter)
(#static createInstance [] #? Interpreter)
(eval [String] #try LispObject))
diff --git a/new-luxc/source/luxc/lang/translation/common-lisp/eval.jvm.lux b/new-luxc/source/luxc/lang/translation/common-lisp/eval.jvm.lux
index 0108d2e83..a10fa0d5d 100644
--- a/new-luxc/source/luxc/lang/translation/common-lisp/eval.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/common-lisp/eval.jvm.lux
@@ -13,14 +13,14 @@
(lang (host ["_" common-lisp #+ Expression])))
[//])
-(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/Class ?)
+(host.import: (java/lang/Class ?)
(#static forName [String] #try (Class Object)))
(def: _0
@@ -46,27 +46,27 @@
text-representation (:coerce Text (Object::toString [] (:coerce Object host-object)))]
(format object-class " --- " text-representation)))
-(host.import org/armedbear/lisp/LispObject)
+(host.import: org/armedbear/lisp/LispObject)
-(host.import org/armedbear/lisp/SimpleString
+(host.import: org/armedbear/lisp/SimpleString
(getStringValue [] String))
-(host.import org/armedbear/lisp/Symbol
+(host.import: org/armedbear/lisp/Symbol
(#static T Symbol)
(getName [] String))
-(host.import org/armedbear/lisp/DoubleFloat
+(host.import: org/armedbear/lisp/DoubleFloat
(doubleValue [] double))
-(host.import org/armedbear/lisp/Bignum
+(host.import: org/armedbear/lisp/Bignum
(longValue [] long))
-(host.import org/armedbear/lisp/Fixnum
+(host.import: org/armedbear/lisp/Fixnum
(longValue [] long))
-(host.import org/armedbear/lisp/Nil)
+(host.import: org/armedbear/lisp/Nil)
-(host.import org/armedbear/lisp/SimpleVector
+(host.import: org/armedbear/lisp/SimpleVector
(length [] int)
(elt [int] LispObject))
@@ -93,7 +93,7 @@
(host.null)))
value])
-(host.import org/armedbear/lisp/Cons
+(host.import: org/armedbear/lisp/Cons
(car LispObject)
(cdr LispObject))
diff --git a/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
index 7387c0dda..43ef5c384 100644
--- a/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
@@ -211,7 +211,7 @@
)))
## [[Numbers]]
-(host.import java/lang/Double
+(host.import: java/lang/Double
(#static MIN_VALUE Double)
(#static MAX_VALUE Double))