From d9a61f20824774cd6621e39b18e73fb492baf454 Mon Sep 17 00:00:00 2001 From: svenbarth Date: Thu, 18 Oct 2012 20:12:16 +0000 Subject: [PATCH] * make internal error unique * add MULU and MULS to taicpu.get_spilling_operation_type git-svn-id: trunk@22746 - --- compiler/aasmtai.pas | 4 ++-- compiler/m68k/aasmcpu.pas | 5 +++-- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/compiler/aasmtai.pas b/compiler/aasmtai.pas index 67d84f7288..8e97a20e6a 100644 --- a/compiler/aasmtai.pas +++ b/compiler/aasmtai.pas @@ -2464,14 +2464,14 @@ implementation { When the generic RA is used this needs to be overridden, we don't use virtual;abstract; to prevent a lot of warnings of unimplemented abstract methods when tai_cpu is created (PFV) } - internalerror(200404091); + internalerror(2004040901); result:=false; end; function tai_cpu_abstract.spilling_get_operation_type(opnr: longint): topertype; begin - internalerror(200404091); + internalerror(2004040902); result:=operand_readwrite; end; diff --git a/compiler/m68k/aasmcpu.pas b/compiler/m68k/aasmcpu.pas index 9aab382efa..7868135b15 100644 --- a/compiler/m68k/aasmcpu.pas +++ b/compiler/m68k/aasmcpu.pas @@ -513,7 +513,8 @@ type begin case opcode of A_MOVE, A_MOVEQ, A_ADD, A_ADDQ, A_ADDX, A_SUB, A_SUBQ, A_SUBX, - A_AND, A_LSR, A_LSL, A_ASR, A_ASL, A_EOR, A_EORI, A_OR: + A_AND, A_LSR, A_LSL, A_ASR, A_ASL, A_EOR, A_EORI, A_OR, + A_MULS, A_MULU: if opnr=1 then begin result:=operand_write; end else begin @@ -528,7 +529,7 @@ type else begin { TODO: FIX ME!!! remove ugly debug code ... } writeln('M68K: unknown opcode when spilling: ',gas_op2str[opcode]); - internalerror(200404091); + internalerror(2004040903); end; end; end;