فهرست منبع

* dummy fix for concatcopy

git-svn-id: branches/avr@17028 -
florian 14 سال پیش
والد
کامیت
acac3ce37c
1فایلهای تغییر یافته به همراه2 افزوده شده و 0 حذف شده
  1. 2 0
      compiler/avr/cgcpu.pas

+ 2 - 0
compiler/avr/cgcpu.pas

@@ -1146,6 +1146,8 @@ unit cgcpu;
         current_asmdata.getjumplabel(l);
         current_asmdata.getjumplabel(l);
         if len>16 then
         if len>16 then
           begin
           begin
+            reference_reset(srcref,0);
+            reference_reset(dstref,0);
             { TODO : load refs! }
             { TODO : load refs! }
             copysize:=OS_8;
             copysize:=OS_8;
             if len<256 then
             if len<256 then