Explorar o código

* compilation with -O3 fixed

florian %!s(int64=3) %!d(string=hai) anos
pai
achega
45bf47ee05
Modificáronse 3 ficheiros con 3 adicións e 0 borrados
  1. 1 0
      compiler/pdecl.pas
  2. 1 0
      compiler/ptype.pas
  3. 1 0
      compiler/symdef.pas

+ 1 - 0
compiler/pdecl.pas

@@ -728,6 +728,7 @@ implementation
          hdef:=nil;
          first:=true;
          had_generic:=false;
+         storetokenpos:=Default(tfileposinfo);
          repeat
            defpos:=current_tokenpos;
            istyperenaming:=false;

+ 1 - 0
compiler/ptype.pas

@@ -1577,6 +1577,7 @@ implementation
 
             current_genericdef:=nil;
             current_specializedef:=nil;
+            olddef:=nil;
 
             is_func:=(token=_FUNCTION);
             consume(token);

+ 1 - 0
compiler/symdef.pas

@@ -6763,6 +6763,7 @@ implementation
         include(pno,pno_showhidden);
 {$endif EXTDEBUG}
         s:='';
+        rn:='';
         if proctypeoption=potype_operator then
           begin
             for t:=NOTOKEN to last_overloaded do