diff options
Diffstat (limited to 'stdlib/source/library/lux/target/jvm/constant.lux')
| -rw-r--r-- | stdlib/source/library/lux/target/jvm/constant.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/library/lux/target/jvm/constant.lux b/stdlib/source/library/lux/target/jvm/constant.lux index 51517ff74..d4841fd43 100644 --- a/stdlib/source/library/lux/target/jvm/constant.lux +++ b/stdlib/source/library/lux/target/jvm/constant.lux @@ -11,7 +11,7 @@ ["[0]" product] ["[0]" text] [format - ["[0]F" binary {"+" [Writer]} ("[1]\[0]" monoid)]] + ["[0]F" binary {"+" [Writer]} ("[1]#[0]" monoid)]] [collection ["[0]" row {"+" [Row]}]]] [macro @@ -54,7 +54,7 @@ (def: .public class_equivalence (Equivalence Class) - (\ equivalence.functor each + (# equivalence.functor each ..index //index.equivalence)) @@ -94,7 +94,7 @@ (All (_ kind) (-> (Equivalence kind) (Equivalence (Value kind)))) - (\ equivalence.functor each + (# equivalence.functor each (|>> :representation) Equivalence<kind>)) @@ -187,7 +187,7 @@ (case [reference sample] (^template [<tag> <equivalence>] [[{<tag> reference} {<tag> sample}] - (\ <equivalence> = reference sample)]) + (# <equivalence> = reference sample)]) ([#UTF8 text.equivalence] [#Integer (..value_equivalence i32.equivalence)] [#Long (..value_equivalence int.equivalence)] @@ -245,7 +245,7 @@ (case value (^template [<case> <tag> <writer>] [{<case> value} - (binaryF\composite (/tag.writer <tag>) + (binaryF#composite (/tag.writer <tag>) (<writer> value))]) (<constants>) )))) |