aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/lua/procedure
diff options
context:
space:
mode:
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/lua/procedure')
-rw-r--r--new-luxc/source/luxc/lang/translation/lua/procedure/common.jvm.lux13
1 files changed, 0 insertions, 13 deletions
diff --git a/new-luxc/source/luxc/lang/translation/lua/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/lua/procedure/common.jvm.lux
index 21baddcfc..b54829a62 100644
--- a/new-luxc/source/luxc/lang/translation/lua/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/lua/procedure/common.jvm.lux
@@ -203,16 +203,6 @@
[int//max "math.maxinteger"]
)
-(do-template [<name> <expression>]
- [(def: (<name> _)
- Nullary
- <expression>)]
-
- [frac//not-a-number (lua./ (lua.int 0) (lua.int 0))]
- [frac//positive-infinity "math.huge"]
- [frac//negative-infinity (lua.* (lua.int -1) "math.huge")]
- )
-
(do-template [<name> <op>]
[(def: (<name> [subjectO paramO])
Binary
@@ -447,9 +437,6 @@
(install "smallest" (nullary frac//smallest))
(install "min" (nullary frac//min))
(install "max" (nullary frac//max))
- (install "not-a-number" (nullary frac//not-a-number))
- (install "positive-infinity" (nullary frac//positive-infinity))
- (install "negative-infinity" (nullary frac//negative-infinity))
(install "to-int" (unary frac//to-int))
(install "encode" (unary frac//encode))
(install "decode" (unary frac//decode)))))