Browse Source

m68k: reenabled some safety checks and removed obsolete TODO comment

git-svn-id: trunk@36604 -
Károly Balogh 8 years ago
parent
commit
8a8753eb79
1 changed files with 3 additions and 3 deletions
  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