aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/compiler/default/phase/translation/scheme/extension/common.jvm.lux
diff options
context:
space:
mode:
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.lux22
1 files changed, 0 insertions, 22 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 c46a5e82e..65184a7ea 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
@@ -241,27 +241,6 @@
(bundle.install "exit" (unary _.exit/1))
(bundle.install "current-time" (nullary (function (_ _) (runtime.io//current-time (_.string synthesis.unit))))))))
-## [[Box]]
-(def: box::new
- Unary
- (|>> (list) _.vector/*))
-
-(def: (box::read box)
- Unary
- (_.vector-ref/2 box (_.int +0)))
-
-(def: (box::write [valueO boxO])
- Binary
- (runtime.box//write valueO boxO))
-
-(def: bundle::box
- Bundle
- (<| (bundle.prefix "box")
- (|> bundle.empty
- (bundle.install "new" (unary box::new))
- (bundle.install "read" (unary box::read))
- (bundle.install "write" (binary box::write)))))
-
## [Bundles]
(def: #export bundle
Bundle
@@ -272,5 +251,4 @@
(dict.merge bundle::frac)
(dict.merge bundle::text)
(dict.merge bundle::io)
- (dict.merge bundle::box)
)))