aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/r
diff options
context:
space:
mode:
authorEduardo Julian2018-07-31 22:23:07 -0400
committerEduardo Julian2018-07-31 22:23:07 -0400
commit97ab1f076ac08992d6b64cd77bc0bef97b3fc50a (patch)
tree6ea01c3e9f5be6a1387c1a7621681d1642176329 /new-luxc/source/luxc/lang/translation/r
parent7e44ee8a2cfb14e35f6283a9eb8d6a2ddc8bd99a (diff)
Now implementing array functionality in stdlib instead of the compiler.
Diffstat (limited to '')
-rw-r--r--new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux25
-rw-r--r--new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux33
2 files changed, 0 insertions, 58 deletions
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 d8b383ff2..421618890 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
@@ -179,30 +179,6 @@
(install "arithmetic-right-shift" (binary bit//arithmetic-right-shift))
)))
-## [[Arrays]]
-(def: (array//get [arrayO idxO])
- Binary
- (runtimeT.array//get arrayO idxO))
-
-(def: (array//put [arrayO idxO elemO])
- Trinary
- (runtimeT.array//put arrayO idxO elemO))
-
-(def: (array//remove [arrayO idxO])
- Binary
- (runtimeT.array//put arrayO idxO r.null))
-
-(def: array-procs
- Bundle
- (<| (prefix "array")
- (|> (dict.new text.Hash<Text>)
- (install "new" (unary runtimeT.array//new))
- (install "get" (binary array//get))
- (install "put" (trinary array//put))
- (install "remove" (binary array//remove))
- (install "size" (unary r.length))
- )))
-
## [[Numbers]]
(host.import: java/lang/Double
(#static MIN_VALUE Double)
@@ -380,7 +356,6 @@
(dict.merge int-procs)
(dict.merge frac-procs)
(dict.merge text-procs)
- (dict.merge array-procs)
(dict.merge io-procs)
(dict.merge box-procs)
)))
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 1f995b44b..e40f49b80 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
@@ -181,38 +181,6 @@
(install "arithmetic-right-shift" (binary bit//arithmetic-right-shift))
)))
-## [[Arrays]]
-(def: (array//new sizeO)
- Unary
- (ruby.apply "Array.new" (list sizeO)))
-
-(def: (array//get [arrayO idxO])
- Binary
- (runtimeT.array//get arrayO idxO))
-
-(def: (array//put [arrayO idxO elemO])
- Trinary
- (runtimeT.array//put arrayO idxO elemO))
-
-(def: (array//remove [arrayO idxO])
- Binary
- (runtimeT.array//put arrayO idxO ruby.nil))
-
-(def: array//size
- Unary
- ruby.length)
-
-(def: array-procs
- Bundle
- (<| (prefix "array")
- (|> (dict.new text.Hash<Text>)
- (install "new" (unary array//new))
- (install "get" (binary array//get))
- (install "put" (trinary array//put))
- (install "remove" (binary array//remove))
- (install "size" (unary array//size))
- )))
-
## [[Numbers]]
(host.import: java/lang/Double
(#static MIN_VALUE Double)
@@ -421,7 +389,6 @@
(dict.merge int-procs)
(dict.merge frac-procs)
(dict.merge text-procs)
- (dict.merge array-procs)
(dict.merge io-procs)
(dict.merge box-procs)
)))