Pārlūkot izejas kodu

* Correctly initialize/finalize had_multiline_string, fixes issue #41359

Michaël Van Canneyt 1 mēnesi atpakaļ
vecāks
revīzija
acc3219aad
1 mainītis faili ar 2 papildinājumiem un 1 dzēšanām
  1. 2 1
      compiler/scanner.pas

+ 2 - 1
compiler/scanner.pas

@@ -5600,7 +5600,7 @@ type
       init_quote_count:=0;
       had_newline:=false;
       first_multiline:=false;
-      had_multiline_string:=in_multiline_string;
+      had_multiline_string:=false;
       backtick:=(c='`');
       if backtick then
         style:=qsBacktick
@@ -6082,6 +6082,7 @@ type
           else
             token:=_CSTRING;
         end;
+      had_multiline_string:=False;
       exit(true);
     end;