diff options
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/scheme/primitive.jvm.lux')
-rw-r--r-- | new-luxc/source/luxc/lang/translation/scheme/primitive.jvm.lux | 30 |
1 files changed, 0 insertions, 30 deletions
diff --git a/new-luxc/source/luxc/lang/translation/scheme/primitive.jvm.lux b/new-luxc/source/luxc/lang/translation/scheme/primitive.jvm.lux deleted file mode 100644 index c7043eeb7..000000000 --- a/new-luxc/source/luxc/lang/translation/scheme/primitive.jvm.lux +++ /dev/null @@ -1,30 +0,0 @@ -(.module: - lux - (lux [macro "meta/" Monad<Meta>]) - (luxc (lang (host [scheme #+ Expression]))) - [//] - (// [".T" runtime])) - -(def: #export translate-bool - (-> Bool (Meta Expression)) - (|>> scheme.bool meta/wrap)) - -(def: #export translate-int - (-> Int (Meta Expression)) - (|>> scheme.int meta/wrap)) - -(def: #export translate-nat - (-> Nat (Meta Expression)) - (|>> (:! Int) scheme.int meta/wrap)) - -(def: #export translate-deg - (-> Deg (Meta Expression)) - (|>> (:! Int) scheme.int meta/wrap)) - -(def: #export translate-frac - (-> Frac (Meta Expression)) - (|>> scheme.float meta/wrap)) - -(def: #export translate-text - (-> Text (Meta Expression)) - (|>> scheme.string meta/wrap)) |