summaryrefslogtreecommitdiffstats
path: root/parser.l
diff options
context:
space:
mode:
Diffstat (limited to 'parser.l')
-rw-r--r--parser.l7
1 files changed, 6 insertions, 1 deletions
diff --git a/parser.l b/parser.l
index 4a133836..7ec31991 100644
--- a/parser.l
+++ b/parser.l
@@ -895,11 +895,16 @@ UONLY {U2}{U}|{U3}{U}{U}|{U4}{U}{U}{U}
return ' ';
}
-<QSILIT,QWLIT>@ {
+<QSILIT,QWLIT>@/([[({'^,@]|{TOK}) {
yy_push_state(QSPECIAL, yyscanner);
return yytext[0];
}
+<QSILIT,QWLIT>@ {
+ yyerrprepf(yyg, lit("malformed @ expression in quasiliteral"), nao);
+ return ERRTOK;
+}
+
<WLIT,QWLIT>{WS} {
return ' ';
}