Compiler/lexical analyzer: Difference between revisions

Content added Content deleted

Inline

@@ Line 12,189: / Line 12,189: @@
   toktup := scan_character_literal_without_checking_end(inp)
   ch1 := @inp
-  while ch1[1] ~=== close_quote do {
+  if ch1[1] ~=== close_quote then {
-    case ch1[1] of {
+    repeat {
+      case ch1[1] of {
-      EOF : unterminated_character_literal(line_no, column_no)
-      close_quote : multicharacter_literal(line_no, column_no)
+        EOF : unterminated_character_literal(line_no, column_no)
+        close_quote : multicharacter_literal(line_no, column_no)
-      default : ch1 := @inp
+        default : ch1 := @inp
+      }
     }
   }