From fe3d11118c231e8abc9ae2c863f2ecd2358849cd Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?K=C3=A1roly=20Balogh?= <karoly@freepascal.org>
Date: Thu, 10 Oct 2013 22:12:40 +0000
Subject: [PATCH] add string version of the new instructions to the right
 place. removed one more duplicate table.

git-svn-id: trunk@25743 -
---
 compiler/m68k/ag68kgas.pas | 61 ++------------------------------------
 compiler/m68k/itcpugas.pas |  4 +++
 2 files changed, 6 insertions(+), 59 deletions(-)

diff --git a/compiler/m68k/ag68kgas.pas b/compiler/m68k/ag68kgas.pas
index 8174ee29e0..4d6e73413f 100644
--- a/compiler/m68k/ag68kgas.pas
+++ b/compiler/m68k/ag68kgas.pas
@@ -42,65 +42,8 @@ interface
       end;
 
     const
-      gas_op2str:op2strtable=
-    {  warning: CPU32 opcodes are not fully compatible with the MC68020. }
-       { 68000 only opcodes }
-       ( '',
-         'abcd','add','adda','addi','addq','addx','and','andi',
-         'asl','asr','bcc','bcs','beq','bge','bgt','bhi',
-         'ble','bls','blt','bmi','bne','bpl','bvc','bvs',
-         'bchg','bclr','bra','bset','bsr','btst','chk',
-         'clr','cmp','cmpa','cmpi','cmpm','dbcc','dbcs','dbeq','dbge',
-         'dbgt','dbhi','dble','dbls','dblt','dbmi','dbne','dbra',
-         'dbpl','dbt','dbvc','dbvs','dbf','divs','divu',
-         'eor','eori','exg','illegal','ext','jmp','jsr',
-         'lea','link','lsl','lsr','move','movea','movei','moveq',
-         'movem','movep','muls','mulu','nbcd','neg','negx',
-         'nop','not','or','ori','pea','rol','ror','roxl',
-         'roxr','rtr','rts','sbcd','scc','scs','seq','sge',
-         'sgt','shi','sle','sls','slt','smi','sne',
-         'spl','st','svc','svs','sf','sub','suba','subi','subq',
-         'subx','swap','tas','trap','trapv','tst','unlk',
-         'rte','reset','stop',
-         { mc68010 instructions }
-         'bkpt','movec','moves','rtd',
-         { mc68020 instructions }
-         'bfchg','bfclr','bfexts','bfextu','bfffo',
-         'bfins','bfset','bftst','callm','cas','cas2',
-         'chk2','cmp2','divsl','divul','extb','pack','rtm',
-         'trapcc','tracs','trapeq','trapf','trapge','trapgt',
-         'traphi','traple','trapls','traplt','trapmi','trapne',
-         'trappl','trapt','trapvc','trapvs','unpk',
-         { mc64040 instructions }
-         'move16',
-         { coldfire v4 instructions }
-         'mov3q','mvz','mvs','sats',
-         { fpu processor instructions - directly supported only. }
-         { ieee aware and misc. condition codes not supported   }
-         'fabs','fadd',
-         'fbeq','fbne','fbngt','fbgt','fbge','fbnge',
-         'fblt','fbnlt','fble','fbgl','fbngl','fbgle','fbngle',
-         'fdbeq','fdbne','fdbgt','fdbngt','fdbge','fdbnge',
-         'fdblt','fdbnlt','fdble','fdbgl','fdbngl','fdbgle','fdbngle',
-         'fseq','fsne','fsgt','fsngt','fsge','fsnge',
-         'fslt','fsnlt','fsle','fsgl','fsngl','fsgle','fsngle',
-         'fcmp','fdiv','fmove','fmovem',
-         'fmul','fneg','fnop','fsqrt','fsub','fsgldiv',
-         'fsflmul','ftst',
-         'ftrapeq','ftrapne','ftrapgt','ftrapngt','ftrapge','ftrapnge',
-         'ftraplt','ftrapnlt','ftraple','ftrapgl','ftrapngl','ftrapgle','ftrapngle',
-         { protected instructions }
-         'cprestore','cpsave',
-         { fpu unit protected instructions                    }
-         { and 68030/68851 common mmu instructions            }
-         { (this may include 68040 mmu instructions)          }
-         'frestore','fsave','pflush','pflusha','pload','pmove','ptest',
-         { useful for assembly language output }
-         'label','db','s','b','fb');
-
-
-     gas_opsize2str : array[topsize] of string[2] =
-     ('','.b','.w','.l','.s','.d','.x','');
+      gas_opsize2str : array[topsize] of string[2] =
+        ('','.b','.w','.l','.s','.d','.x','');
 
 
   implementation
diff --git a/compiler/m68k/itcpugas.pas b/compiler/m68k/itcpugas.pas
index 2f70bec349..cfe77aae22 100644
--- a/compiler/m68k/itcpugas.pas
+++ b/compiler/m68k/itcpugas.pas
@@ -58,6 +58,10 @@ interface
          'trapcc','tracs','trapeq','trapf','trapge','trapgt',
          'traphi','traple','trapls','traplt','trapmi','trapne',
          'trappl','trapt','trapvc','trapvs','unpk',
+         { mc64040 instructions }
+         'move16',
+         { coldfire v4 instructions }
+         'mov3q','mvz','mvs','sats',
          { fpu processor instructions - directly supported only. }
          { ieee aware and misc. condition codes not supported   }
          'fabs','fadd',