summaryrefslogtreecommitdiffstats
path: root/parser.l
diff options
context:
space:
mode:
Diffstat (limited to 'parser.l')
-rw-r--r--parser.l6
1 files changed, 5 insertions, 1 deletions
diff --git a/parser.l b/parser.l
index 4739dd59..29a45ab1 100644
--- a/parser.l
+++ b/parser.l
@@ -960,12 +960,16 @@ void end_of_char(scanner_t *yyg)
yy_pop_state(yyg);
}
-void reset_scanner(scanner_t *yyg)
+int reset_scanner(scanner_t *yyg)
{
+ int hold_byte = yyg->yy_hold_char;
+
while (YYSTATE != INITIAL)
yy_pop_state(yyg);
yy_flush_buffer(YY_CURRENT_BUFFER, yyg);
+
+ return hold_byte;
}
val source_loc(val form)