Explorar o código

tstaticvarsym.ppuload: read the section string outside of the symansistr define to match the code of ppuwrite

git-svn-id: trunk@27467 -
svenbarth %!s(int64=11) %!d(string=hai) anos
pai
achega
8ae36f3ef4
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/symsym.pas

+ 1 - 1
compiler/symsym.pas

@@ -1840,9 +1840,9 @@ implementation
            _mangledname:=stringdup(ppufile.getstring)
          else
            _mangledname:=nil;
+{$endif symansistr}
          if vo_has_section in varoptions then
            section:=ppufile.getansistring;
-{$endif symansistr}
          ppufile.getderef(defaultconstsymderef);
          ppuload_platform(ppufile);
       end;