Explorar o código

* resolve postponed local switch changes before switching mode

git-svn-id: trunk@1880 -
florian %!s(int64=20) %!d(string=hai) anos
pai
achega
d6628f1d8b
Modificáronse 1 ficheiros con 6 adicións e 0 borrados
  1. 6 0
      compiler/scanner.pas

+ 6 - 0
compiler/scanner.pas

@@ -288,6 +288,12 @@ implementation
 
         if b then
          begin
+           { resolve all postponed switch changes }
+           if localswitcheschanged then
+             begin
+               aktlocalswitches:=nextaktlocalswitches;
+               localswitcheschanged:=false;
+             end;
            { turn ansistrings on by default ? }
            if (m_delphi in aktmodeswitches) then
             begin