Compiler/lexical analyzer: Difference between revisions

Content added Content deleted
Line 12,187: Line 12,187:
toktup := scan_character_literal_without_checking_end(inp)
toktup := scan_character_literal_without_checking_end(inp)
ch1 := @inp
ch1 := @inp
while EOF ~=== ch1[1] & ch1[1] ~== close_quote do {
while ch1[1] ~=== close_quote do {
case ch1[1] of {
case ch1[1] of {
EOF : unterminated_character_literal(line_no, column_no)
EOF : unterminated_character_literal(line_no, column_no)