aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux
diff options
context:
space:
mode:
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux')
-rw-r--r--new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux8
1 files changed, 0 insertions, 8 deletions
diff --git a/new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux b/new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux
index 4e26c4218..1c8c17bed 100644
--- a/new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux
@@ -13,14 +13,6 @@
(-> Int (Meta Expression))
(|>> _.int meta/wrap))
-(def: #export translate-nat
- (-> Nat (Meta Expression))
- (|>> (:coerce Int) _.int meta/wrap))
-
-(def: #export translate-deg
- (-> Deg (Meta Expression))
- (|>> (:coerce Int) _.int meta/wrap))
-
(def: #export translate-frac
(-> Frac (Meta Expression))
(|>> _.double meta/wrap))