diff options
Diffstat (limited to 'stdlib/source/lux/compiler/default/phase/translation/scheme/extension/common.jvm.lux')
-rw-r--r-- | stdlib/source/lux/compiler/default/phase/translation/scheme/extension/common.jvm.lux | 29 |
1 files changed, 0 insertions, 29 deletions
diff --git a/stdlib/source/lux/compiler/default/phase/translation/scheme/extension/common.jvm.lux b/stdlib/source/lux/compiler/default/phase/translation/scheme/extension/common.jvm.lux index d1576248d..c46a5e82e 100644 --- a/stdlib/source/lux/compiler/default/phase/translation/scheme/extension/common.jvm.lux +++ b/stdlib/source/lux/compiler/default/phase/translation/scheme/extension/common.jvm.lux @@ -115,34 +115,6 @@ (bundle.install "arithmetic-right-shift" (binary bit::arithmetic-right-shift)) ))) -## [[Arrays]] -(def: (array::new size0) - Unary - (_.make-vector/2 size0 _.nil)) - -(def: (array::get [arrayO idxO]) - Binary - (runtime.array//get arrayO idxO)) - -(def: (array::put [arrayO idxO elemO]) - Trinary - (runtime.array//put arrayO idxO elemO)) - -(def: (array::remove [arrayO idxO]) - Binary - (runtime.array//put arrayO idxO _.nil)) - -(def: bundle::array - Bundle - (<| (bundle.prefix "array") - (|> bundle.empty - (bundle.install "new" (unary array::new)) - (bundle.install "get" (binary array::get)) - (bundle.install "put" (trinary array::put)) - (bundle.install "remove" (binary array::remove)) - (bundle.install "size" (unary _.vector-length/1)) - ))) - ## [[Numbers]] (import: java/lang/Double (#static MIN_VALUE Double) @@ -299,7 +271,6 @@ (dict.merge bundle::int) (dict.merge bundle::frac) (dict.merge bundle::text) - (dict.merge bundle::array) (dict.merge bundle::io) (dict.merge bundle::box) ))) |