aboutsummaryrefslogtreecommitdiff
path: root/lux-jvm
diff options
context:
space:
mode:
authorEduardo Julian2021-05-31 13:02:33 -0400
committerEduardo Julian2021-05-31 13:02:33 -0400
commitd5c14e64940a7f6d0e2bb207f12f21fc7b95656d (patch)
tree5cd27e7656cb6b4c2a2388a124b51b3c9765b286 /lux-jvm
parent38c2eb5d39838e415a8c1f51b79099086b391a22 (diff)
"lux io current-time" is no longer an extension.
Diffstat (limited to 'lux-jvm')
-rw-r--r--lux-jvm/source/luxc/lang/translation/jvm/extension/common.lux15
1 files changed, 1 insertions, 14 deletions
diff --git a/lux-jvm/source/luxc/lang/translation/jvm/extension/common.lux b/lux-jvm/source/luxc/lang/translation/jvm/extension/common.lux
index 39934dbb8..c9eed9489 100644
--- a/lux-jvm/source/luxc/lang/translation/jvm/extension/common.lux
+++ b/lux-jvm/source/luxc/lang/translation/jvm/extension/common.lux
@@ -304,17 +304,6 @@
(_.INVOKESPECIAL $Error "<init>" string_method)
_.ATHROW)))
-(def: (io::exit codeI)
- (Unary Inst)
- (|>> codeI jvm_intI
- (_.INVOKESTATIC $System "exit" (type.method [(list type.int) type.void (list)]))
- _.NULL))
-
-(def: (io::current_time _)
- (Nullary Inst)
- (|>> (_.INVOKESTATIC $System "currentTimeMillis" (type.method [(list) type.long (list)]))
- (_.wrap type.long)))
-
(def: bundle::lux
Bundle
(|> (: Bundle bundle.empty)
@@ -376,9 +365,7 @@
(<| (bundle.prefix "io")
(|> (: Bundle bundle.empty)
(bundle.install "log" (unary io::log))
- (bundle.install "error" (unary io::error))
- (bundle.install "exit" (unary io::exit))
- (bundle.install "current-time" (nullary io::current_time)))))
+ (bundle.install "error" (unary io::error)))))
(def: #export bundle
Bundle