aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/r
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--new-luxc/source/luxc/lang/translation/r.lux16
-rw-r--r--new-luxc/source/luxc/lang/translation/r/eval.jvm.lux18
-rw-r--r--new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux2
-rw-r--r--new-luxc/source/luxc/lang/translation/ruby.lux12
-rw-r--r--new-luxc/source/luxc/lang/translation/ruby/eval.jvm.lux8
-rw-r--r--new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux2
6 files changed, 29 insertions, 29 deletions
diff --git a/new-luxc/source/luxc/lang/translation/r.lux b/new-luxc/source/luxc/lang/translation/r.lux
index e9c984636..9b8746008 100644
--- a/new-luxc/source/luxc/lang/translation/r.lux
+++ b/new-luxc/source/luxc/lang/translation/r.lux
@@ -28,27 +28,27 @@
[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 javax/script/ScriptEngine
+(host.import: javax/script/ScriptEngine
(eval [String] #try #? Object))
-(host.import javax/script/ScriptEngineFactory
+(host.import: javax/script/ScriptEngineFactory
(getScriptEngine [] ScriptEngine))
-(host.import org/renjin/script/RenjinScriptEngineFactory
+(host.import: org/renjin/script/RenjinScriptEngineFactory
(new []))
(type: #export Anchor [Text Register])
diff --git a/new-luxc/source/luxc/lang/translation/r/eval.jvm.lux b/new-luxc/source/luxc/lang/translation/r/eval.jvm.lux
index eb20d73c5..0bfd50aa8 100644
--- a/new-luxc/source/luxc/lang/translation/r/eval.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/r/eval.jvm.lux
@@ -21,33 +21,33 @@
[Cannot-Evaluate]
)
-(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 org/renjin/sexp/SEXP)
+(host.import: org/renjin/sexp/SEXP)
-(host.import org/renjin/sexp/StringArrayVector
+(host.import: org/renjin/sexp/StringArrayVector
(getElementAsString [int] String))
-(host.import org/renjin/sexp/LogicalArrayVector
+(host.import: org/renjin/sexp/LogicalArrayVector
(getElementAsRawLogical [int] int))
-(host.import org/renjin/sexp/IntArrayVector
+(host.import: org/renjin/sexp/IntArrayVector
(getElementAsInt [int] int))
-(host.import org/renjin/sexp/DoubleArrayVector
+(host.import: org/renjin/sexp/DoubleArrayVector
(getElementAsDouble [int] double))
-(host.import org/renjin/sexp/ListVector
+(host.import: org/renjin/sexp/ListVector
(length [] int)
(getElementAsSEXP [int] #try SEXP)
(getElementAsSEXP #as get-field-sexp [String] #try SEXP))
-(host.import org/renjin/sexp/Null)
+(host.import: org/renjin/sexp/Null)
(def: (parse-tuple lux-object host-object)
(-> (-> Object (Error Any)) ListVector (Error Any))
diff --git a/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux
index 03cc802fc..885837078 100644
--- a/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux
@@ -209,7 +209,7 @@
)))
## [[Numbers]]
-(host.import java/lang/Double
+(host.import: java/lang/Double
(#static MIN_VALUE Double)
(#static MAX_VALUE Double))
diff --git a/new-luxc/source/luxc/lang/translation/ruby.lux b/new-luxc/source/luxc/lang/translation/ruby.lux
index 1ed9f30e1..a42dae024 100644
--- a/new-luxc/source/luxc/lang/translation/ruby.lux
+++ b/new-luxc/source/luxc/lang/translation/ruby.lux
@@ -28,21 +28,21 @@
[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 org/jruby/embed/ScriptingContainer
+(host.import: org/jruby/embed/ScriptingContainer
(new [])
(runScriptlet [String] #? Object))
diff --git a/new-luxc/source/luxc/lang/translation/ruby/eval.jvm.lux b/new-luxc/source/luxc/lang/translation/ruby/eval.jvm.lux
index 3c590e8ee..52a261b2a 100644
--- a/new-luxc/source/luxc/lang/translation/ruby/eval.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/ruby/eval.jvm.lux
@@ -21,18 +21,18 @@
[Cannot-Evaluate]
)
-(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 org/jruby/RubyArray
+(host.import: org/jruby/RubyArray
(getLength [] int)
(get [int] #? Object))
-(host.import org/jruby/RubyHash
+(host.import: org/jruby/RubyHash
(get [Object] #? Object))
(def: (tuple lux-object host-object)
diff --git a/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux
index 7fb521751..f26cefad6 100644
--- a/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux
@@ -219,7 +219,7 @@
)))
## [[Numbers]]
-(host.import java/lang/Double
+(host.import: java/lang/Double
(#static MIN_VALUE Double)
(#static MAX_VALUE Double))