diff options
Diffstat (limited to 'stdlib/source/lux/host/jvm/modifier.lux')
| -rw-r--r-- | stdlib/source/lux/host/jvm/modifier.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/lux/host/jvm/modifier.lux b/stdlib/source/lux/host/jvm/modifier.lux index e41e5c5e1..cb535a96b 100644 --- a/stdlib/source/lux/host/jvm/modifier.lux +++ b/stdlib/source/lux/host/jvm/modifier.lux @@ -10,7 +10,7 @@ [format ["." binary]] [collection - ["." list ("#/." functor)]]] + ["." list ("#;." functor)]]] [type ["." abstract]] [macro (#+ with-gensyms) @@ -59,7 +59,7 @@ (.|> ((~! number.hex) (~ g!<code>)) //encoding.to-u2 abstract.:abstraction))] ["0000" (~ g!empty)] - (~+ (list/map ..code options)) + (~+ (list;map ..code options)) ) (.structure: (~' #export) (~' modifier-equivalence) (equivalence.Equivalence (~ g!name)) @@ -70,12 +70,12 @@ (.def: (~' #export) (~ g!format) (binary.Format (~ g!name)) - (.let [(.^open "_/.") //encoding.u2-format] - {#binary.reader (|> (~' _/reader) + (.let [(.^open "_;.") //encoding.u2-format] + {#binary.reader (|> (~' _;reader) (:: parser.functor (~' map) (|>> abstract.:abstraction))) #binary.writer (|>> abstract.:representation - (~' _/writer))})))) + (~' _;writer))})))) monoidC (` (.structure: (~' #export) (~' modifier-monoid) (monoid.Monoid (~ g!name)) (.def: (~' identity) (~ g!empty)) (.def: (~' compose) (~ g!combine))))] |