* MIPS64 can

  * MIPS64 does not need separate 64 bit code path for ordinals

compiler/mips/cpupara.pas

@@ -365,7 +365,8 @@ implementation
             while paralen>0 do
               begin
                 paraloc:=hp.paraloc[side].add_location;
-                { We can allocate at maximum 32 bits per register }
+{$ifndef cpu64bitalu}
+                { We can allocate at maximum 32 bits per register on mips32 }
                 if (paracgsize in [OS_64,OS_S64]) or
                    ((paracgsize in [OS_F32,OS_F64]) and
                      not(can_use_float)) then
@@ -374,6 +375,7 @@ implementation
                     paraloc^.def:=u32inttype;
                   end
                 else
+{$endif cpu64bitalu}
                   begin
                     paraloc^.size:=paracgsize;
                     paraloc^.def:=locdef;

compiler/ncgadd.pas

@@ -786,9 +786,11 @@ interface
               if is_boolean(left.resultdef) and
                  is_boolean(right.resultdef) then
                 second_opboolean
+{$ifndef cpu64bitalu}
               { 64bit operations }
               else if is_64bit(left.resultdef) then
                 second_op64bit
+{$endif cpu64bitalu}
               else
                 second_opordinal;
             end;