From b741ed63b0d8fc0e5377f85bd328bf3e7fd334ca Mon Sep 17 00:00:00 2001 From: nickysn Date: Wed, 22 Apr 2020 02:31:21 +0000 Subject: [PATCH] - commented out internal error in trgcpu.do_spill_read and trgcpu.do_spill_written git-svn-id: branches/z80@44988 - --- compiler/z80/rgcpu.pas | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/compiler/z80/rgcpu.pas b/compiler/z80/rgcpu.pas index d83fcd718e..69e41285d2 100644 --- a/compiler/z80/rgcpu.pas +++ b/compiler/z80/rgcpu.pas @@ -79,9 +79,9 @@ unit rgcpu; helplist : TAsmList; hreg : tregister; begin - if abs(spilltemp.offset)>127 then - begin - Internalerror(2017032701); + // if abs(spilltemp.offset)>127 then + // begin + // Internalerror(2017032701); // // helplist:=TAsmList.create; // @@ -95,8 +95,8 @@ unit rgcpu; // helplist.concat(helpins); // list.insertlistafter(pos,helplist); // helplist.free; - end - else + // end + // else inherited; end; @@ -107,9 +107,9 @@ unit rgcpu; helplist : TAsmList; hreg : tregister; begin - if abs(spilltemp.offset)>127 then - begin - Internalerror(2017032702); + // if abs(spilltemp.offset)>127 then + // begin + // Internalerror(2017032702); // // helplist:=TAsmList.create; // @@ -122,8 +122,8 @@ unit rgcpu; // helplist.concat(spilling_create_store(tempreg,tmpref)); // list.insertlistafter(pos,helplist); // helplist.free; - end - else + // end + // else inherited; end;