Selaa lähdekoodia

* don't crash if we have to spill a register of the last instruction in an
asmlist

git-svn-id: trunk@30402 -

Jonas Maebe 10 vuotta sitten
vanhempi
commit
197e5194b9
1 muutettua tiedostoa jossa 2 lisäystä ja 0 poistoa
  1. 2 0
      compiler/rgobj.pas

+ 2 - 0
compiler/rgobj.pas

@@ -2331,6 +2331,8 @@ unit rgobj;
             end;
 
         { store the spilled registers }
+        if not assigned(instr.next) then
+          list.concat(tai_marker.Create(mark_Position));
         storepos:=tai(instr.next);
         for counter := 0 to pred(regs.reginfocount) do
           with regs.reginfo[counter] do