Browse Source

* make internal error unique
* add MULU and MULS to taicpu.get_spilling_operation_type

git-svn-id: trunk@22746 -

svenbarth 12 years ago
parent
commit
d9a61f2082
2 changed files with 5 additions and 4 deletions
  1. 2 2
      compiler/aasmtai.pas
  2. 3 2
      compiler/m68k/aasmcpu.pas

+ 2 - 2
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;
 

+ 3 - 2
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;