diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/library/lux/data/text/escape.lux | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/library/lux/data/text/escape.lux b/stdlib/source/library/lux/data/text/escape.lux index 7b9caa349..608737079 100644 --- a/stdlib/source/library/lux/data/text/escape.lux +++ b/stdlib/source/library/lux/data/text/escape.lux @@ -22,7 +22,7 @@ (def: sigil "\") -(template [<char> <sigil>] +(with_template [<char> <sigil>] [(def: <char> (|> <sigil> (//.char 0) maybe.trusted))] @@ -30,7 +30,7 @@ [\u_sigil "u"] ) -(template [<literal> <sigil> <escaped>] +(with_template [<literal> <sigil> <escaped>] [(def: <sigil> (|> <literal> (//.char 0) maybe.trusted)) @@ -49,7 +49,7 @@ [..sigil \\_sigil escaped_\\] ) -(template [<char> <text>] +(with_template [<char> <text>] [(def: <char> (|> <text> (//.char 0) maybe.trusted))] @@ -73,7 +73,7 @@ (or (n.< ..ascii_bottom char) (n.> ..ascii_top char) (case char - (^.template [<char>] + (^.with_template [<char>] [(pattern (static <char>)) true]) ([..\0] [..\a] [..\b] [..\t] @@ -118,7 +118,7 @@ limit ("lux text size" text)]) (if (n.< limit offset) (case ("lux text char" offset current) - (^.template [<char> <replacement>] + (^.with_template [<char> <replacement>] [(pattern (static <char>)) (let [[previous' current' limit'] (ascii_escaped <replacement> offset limit previous current)] (again 0 previous' current' limit'))]) @@ -206,7 +206,7 @@ (let [@sigil (++ offset)] (if (n.< limit @sigil) (case ("lux text char" @sigil current) - (^.template [<sigil> <un_escaped>] + (^.with_template [<sigil> <un_escaped>] [(pattern (static <sigil>)) (let [[previous' current' limit'] (..ascii_un_escaped <un_escaped> offset previous current limit)] (again 0 previous' current' limit'))]) |