diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-04-24 15:38:23 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-04-24 15:38:23 (GMT) |
| commit | 252880a07caecf28ba061cfb72f90a9c4cd43ef6 (patch) | |
| tree | c9eb1350332b5ef5001568ff80c22d3bfb7927e1 /generic/regc_lex.c | |
| parent | 5db75c45c9ce6e1fa62becdb0da954f712c391b8 (diff) | |
| download | tcl-252880a07caecf28ba061cfb72f90a9c4cd43ef6.zip tcl-252880a07caecf28ba061cfb72f90a9c4cd43ef6.tar.gz tcl-252880a07caecf28ba061cfb72f90a9c4cd43ef6.tar.bz2 | |
Make (unsupported) 'U' regex escaping work again.
Diffstat (limited to 'generic/regc_lex.c')
| -rw-r--r-- | generic/regc_lex.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/regc_lex.c b/generic/regc_lex.c index f49c162..f8fa772 100644 --- a/generic/regc_lex.c +++ b/generic/regc_lex.c @@ -852,7 +852,7 @@ lexescape( i = 0xFFFD; } #endif - RETV(PLAIN, c); + RETV(PLAIN, (uchr)i); break; case CHR('v'): RETV(PLAIN, CHR('\v')); |