* prevent previously freed temp blocks from getting lost occasionally (can

    significantly reduce the stack frame size, more than 3 times in one place
    in the compiler)

git-svn-id: trunk@24025 -

compiler/tgobj.pas

@@ -484,7 +484,10 @@ implementation
                      hp:=hprev;
                    end
                   else
-                   hprevfree^.nextfree:=hp;
+                   begin
+                     hp^.nextfree:=hprevfree^.nextfree;
+                     hprevfree^.nextfree:=hp;
+                   end;
                 end
                else
                 begin