فهرست منبع

m68k: reenabled some safety checks and removed obsolete TODO comment

git-svn-id: trunk@36604 -
Károly Balogh 8 سال پیش
والد
کامیت
8a8753eb79
1فایلهای تغییر یافته به همراه3 افزوده شده و 3 حذف شده
  1. 3 3
      compiler/m68k/cgcpu.pas

+ 3 - 3
compiler/m68k/cgcpu.pas

@@ -343,11 +343,11 @@ unit cgcpu;
         begin
         begin
           if not assigned(paraloc) then
           if not assigned(paraloc) then
             exit;
             exit;
-{ TODO: FIX ME!!! this also triggers location bug }
-          {if (paraloc^.loc<>LOC_REFERENCE) or
+
+          if (paraloc^.loc<>LOC_REFERENCE) or
              (paraloc^.reference.index<>NR_STACK_POINTER_REG) or
              (paraloc^.reference.index<>NR_STACK_POINTER_REG) or
              (tcgsize2size[paraloc^.size]>sizeof(tcgint)) then
              (tcgsize2size[paraloc^.size]>sizeof(tcgint)) then
-            internalerror(200501162);}
+            internalerror(200501162);
 
 
           { Pushes are needed in reverse order, add the size of the
           { Pushes are needed in reverse order, add the size of the
             current location to the offset where to load from. This
             current location to the offset where to load from. This