diff options
author | Eduardo Julian | 2019-11-09 20:11:40 -0400 |
---|---|---|
committer | Eduardo Julian | 2019-11-09 20:11:40 -0400 |
commit | 7c97ca870883655449da7c64dbe3fc30f47ed928 (patch) | |
tree | a73931dcb636c722d2bb52103873064ef75cd3da /stdlib/source/lux/target/jvm/constant.lux | |
parent | a23315e79ff58024134e5d20b4a4cb5bd8050152 (diff) |
WIP: Tests for JVM bytecode machinery. [Part 0]
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/lux/target/jvm/constant.lux | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/stdlib/source/lux/target/jvm/constant.lux b/stdlib/source/lux/target/jvm/constant.lux index 0cc7e16e1..91a72390a 100644 --- a/stdlib/source/lux/target/jvm/constant.lux +++ b/stdlib/source/lux/target/jvm/constant.lux @@ -40,6 +40,10 @@ {} (Index UTF8) + + (def: #export index + (-> Class (Index UTF8)) + (|>> :representation)) (def: #export class (-> (Index UTF8) Class) @@ -48,7 +52,7 @@ (def: #export class-equivalence (Equivalence Class) (:: equivalence.contravariant map-1 - (|>> :representation) + ..index //index.equivalence)) (def: class-writer |