diff options
Diffstat (limited to 'stdlib/source/lux/data/text/unicode.lux')
| -rw-r--r-- | stdlib/source/lux/data/text/unicode.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/lux/data/text/unicode.lux b/stdlib/source/lux/data/text/unicode.lux index 951bfe761..11a98b358 100644 --- a/stdlib/source/lux/data/text/unicode.lux +++ b/stdlib/source/lux/data/text/unicode.lux @@ -36,7 +36,7 @@ (-> Char Char Segment) (:abstraction (interval.between nat.enum (n/min start end) (n/max start end)))) - (do-template [<name> <slot>] + (template [<name> <slot>] [(def: #export <name> (-> Segment Char) (|>> :representation (get@ <slot>)))] @@ -56,7 +56,7 @@ (interval.within? (:representation segment) char)) ) -(do-template [<name> <start> <end>] +(template [<name> <start> <end>] [(def: #export <name> Segment (..segment (hex <start>) (hex <end>)))] ## Normal segments @@ -347,7 +347,7 @@ Set (finger.branch (set half/0) (set half/1))) -(do-template [<name> <segments>] +(template [<name> <segments>] [(def: #export <name> Set (set <segments>))] [ascii (list basic-latin)] |