aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux
diff options
context:
space:
mode:
authorEduardo Julian2019-05-01 20:33:42 -0400
committerEduardo Julian2019-05-01 20:33:42 -0400
commitc923517c864dad362ef00ae78b449bb40cc27e84 (patch)
treea758099e76424db4fc8ec8d8cc18a8a699d68d66 /new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux
parent0c20f4a8362d42572edecb6ef9844b75c4c859f8 (diff)
The Common Lisp compiler is alive.
Diffstat (limited to '')
-rw-r--r--new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux22
1 files changed, 0 insertions, 22 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
deleted file mode 100644
index 7556e6ebb..000000000
--- a/new-luxc/source/luxc/lang/translation/common-lisp/primitive.jvm.lux
+++ /dev/null
@@ -1,22 +0,0 @@
-(.module:
- lux
- (lux [macro "meta/" Monad<Meta>])
- (luxc (lang (host ["_" common-lisp #+ Expression])))
- [//]
- (// [".T" runtime]))
-
-(def: #export translate-bit
- (-> Bit (Meta Expression))
- (|>> _.bool meta/wrap))
-
-(def: #export translate-int
- (-> Int (Meta Expression))
- (|>> _.int meta/wrap))
-
-(def: #export translate-frac
- (-> Frac (Meta Expression))
- (|>> _.double meta/wrap))
-
-(def: #export translate-text
- (-> Text (Meta Expression))
- (|>> _.string meta/wrap))