diff options
author | Eduardo Julian | 2018-07-31 22:23:07 -0400 |
---|---|---|
committer | Eduardo Julian | 2018-07-31 22:23:07 -0400 |
commit | 97ab1f076ac08992d6b64cd77bc0bef97b3fc50a (patch) | |
tree | 6ea01c3e9f5be6a1387c1a7621681d1642176329 /new-luxc/source/luxc/lang/translation/r | |
parent | 7e44ee8a2cfb14e35f6283a9eb8d6a2ddc8bd99a (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.lux | 25 | ||||
-rw-r--r-- | new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux | 33 |
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) ))) |