aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
diff options
context:
space:
mode:
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux')
-rw-r--r--new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux11
1 files changed, 0 insertions, 11 deletions
diff --git a/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
index 6ac2d6a0a..e1ba0494a 100644
--- a/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
@@ -220,15 +220,6 @@
[frac//max Double::MAX_VALUE _.double]
)
-(do-template [<name> <expression>]
- [(def: (<name> _)
- Nullary
- (_.int <expression>))]
-
- [int//min ("lux int min")]
- [int//max ("lux int max")]
- )
-
(do-template [<name> <op>]
[(def: (<name> [subjectO paramO])
Binary
@@ -276,8 +267,6 @@
(install "%" (binary int//%))
(install "=" (binary int//=))
(install "<" (binary int//<))
- (install "min" (nullary int//min))
- (install "max" (nullary int//max))
(install "to-frac" (unary (|>> (_./ (_.double 1.0))))))))
(def: frac-procs