diff options
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/jvm.lux')
| -rw-r--r-- | new-luxc/source/luxc/lang/translation/jvm.lux | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/new-luxc/source/luxc/lang/translation/jvm.lux b/new-luxc/source/luxc/lang/translation/jvm.lux index b2822726c..b5d53aa4f 100644 --- a/new-luxc/source/luxc/lang/translation/jvm.lux +++ b/new-luxc/source/luxc/lang/translation/jvm.lux @@ -10,20 +10,18 @@ [concurrency ["." atom (#+ Atom atom)]]] [data + [binary (#+ Binary)] ["." product] ["." error (#+ Error)] - ["." text ("#/." hash) - format] + ["." text ("#@." hash) + ["%" format (#+ format)]] [collection ["." array] - [list ("#/." functor)] ["." dictionary (#+ Dictionary)]]] [target [jvm ["." loader (#+ Library)] ["." type (#+ Type)]]] - [world - [binary (#+ Binary)]] [tool [compiler ["." name]]]] @@ -127,7 +125,7 @@ (-> Library ClassLoader Name Inst (Error [Text Any Definition])) (let [class-name (format (text.replace-all .module-separator class-path-separator module) class-path-separator (name.normalize name) - "___" (%n (text/hash name)))] + "___" (%.nat (text@hash name)))] (do error.monad [[value definition] (evaluate! library loader class-name valueI)] (wrap [class-name value definition])))) |