diff --git a/compiler/m68k/cgcpu.pas b/compiler/m68k/cgcpu.pas index b15b7c8dac..f3961e5f06 100644 --- a/compiler/m68k/cgcpu.pas +++ b/compiler/m68k/cgcpu.pas @@ -1197,15 +1197,15 @@ unit cgcpu; OP_MUL, OP_IMUL: begin - if current_settings.cputype <> cpu_mc68020 then + if (current_settings.cputype <> cpu_mc68020) and + (not (current_settings.cputype in cpu_coldfire)) then if op = OP_MUL then call_rtl_mul_reg_reg(list,reg1,reg2,'fpc_mul_dword') else call_rtl_mul_reg_reg(list,reg1,reg2,'fpc_mul_longint') else begin - { 68020+ codepath, probably could be improved to - include more CPUs... (KB) } + { 68020+ and ColdFire codepath, probably could be improved } hreg1 := force_to_dataregister(list, size, reg1); hreg2 := force_to_dataregister(list, size, reg2);