Previous commit broke UTF-8 lexing, by changing the get_char

semantics on the input stream to wide character input.
Also, reading a query the command line (-c) must
read bytes from a UTF-8 encoding of the string.
We introduce a new get_byte function which can extract bytes
from streams which provide it.

1 files changed, 2 insertions, 2 deletions

diff --git a/parser.l b/parser.l
index 801185f0..39392d7f 100644
--- a/parser.l
+++ b/parser.l
@@ -48,8 +48,8 @@
     obj_t *c = nil;                               \
     int n, ch = '*';                              \
     for (n = 0; n < max_size &&                   \
-                (c = get_char(yyin_stream)) &&    \
-                (ch = c_chr(c)) != '\n'; ++n)     \
+                (c = get_byte(yyin_stream)) &&    \
+                (ch = c_num(c)) != '\n'; ++n)     \
       buf[n] = (char) ch;                         \
     if (ch == '\n')                               \
       buf[n++] = (char) ch;                       \