diff options
author | Eduardo Julian | 2020-03-19 21:18:58 -0400 |
---|---|---|
committer | Eduardo Julian | 2020-03-19 21:18:58 -0400 |
commit | 6b8678f818a5f7399a50f4e2108d96783d22fd67 (patch) | |
tree | ade6d0a7b3c2dd7a826a90a56dc6e94600b59bbb /new-luxc/source/luxc/lang/translation/jvm/runtime.lux | |
parent | 409deaa8f8a9727cf42762c8ac8ebe5b2766a04b (diff) |
Got the new compiler to build again.
Diffstat (limited to '')
-rw-r--r-- | new-luxc/source/luxc/lang/translation/jvm/runtime.lux | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/new-luxc/source/luxc/lang/translation/jvm/runtime.lux b/new-luxc/source/luxc/lang/translation/jvm/runtime.lux index 72763d01f..eb3ed9b7f 100644 --- a/new-luxc/source/luxc/lang/translation/jvm/runtime.lux +++ b/new-luxc/source/luxc/lang/translation/jvm/runtime.lux @@ -3,6 +3,8 @@ [abstract [monad (#+ do)]] [data + [text + ["%" format (#+ format)]] [collection ["." list ("#@." functor)]]] ["." math] @@ -27,6 +29,12 @@ ["_" inst]]]]] ["." // (#+ ByteCode)]) +(def: prefix "lux/") + +(def: #export (class-name [module id]) + (-> generation.Context Text) + (format ..prefix module "/" (%.nat id))) + (def: $Text (type.class "java.lang.String" (list))) (def: #export $Tag type.int) (def: #export $Flag (type.class "java.lang.Object" (list))) |