diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/library/lux/data/format/binary.lux | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/stdlib/source/library/lux/data/format/binary.lux b/stdlib/source/library/lux/data/format/binary.lux index 71aeb6fc6..3ee903853 100644 --- a/stdlib/source/library/lux/data/format/binary.lux +++ b/stdlib/source/library/lux/data/format/binary.lux @@ -7,26 +7,26 @@ [equivalence {"+" [Equivalence]}]] [control [pipe {"+" [case>]}] - ["." function] - ["." try {"+" [Try]}] - ["<>" parser ("#\." monad) + ["[0]" function] + ["[0]" try {"+" [Try]}] + ["<>" parser ("[1]\[0]" monad) ["/" binary {"+" [Offset Size Parser]}]]] [data - ["." product] - ["." binary {"+" [Binary]}] + ["[0]" product] + ["[0]" binary {"+" [Binary]}] [text ["%" format {"+" [format]}] [encoding - ["." utf8]]] + ["[0]" utf8]]] [collection - ["." list] - ["." row {"+" [Row]} ("#\." functor)] - ["." set {"+" [Set]}]]] + ["[0]" list] + ["[0]" row {"+" [Row]} ("[1]\[0]" functor)] + ["[0]" set {"+" [Set]}]]] [math [number - ["." i64] + ["[0]" i64] ["n" nat] - ["." frac]]]]]) + ["[0]" frac]]]]]) (def: mask (-> Size (I64 Any)) @@ -185,7 +185,7 @@ value (if (n.= original_count capped_count) value (|> value row.list (list.first capped_count) row.of_list)) - (^open "specification\.") ..monoid + (^open "specification\[0]") ..monoid [size mutation] (|> value (row\each valueW) (\ row.mix mix |