paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 16:49:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

added 68040 CPU type, MOVE16 and ColdFire V4 extra instructions

Browse Source 
git-svn-id: trunk@25742 -
This commit is contained in:
Károly Balogh 2013-10-10 22:01:58 +00:00
parent 280ee919b7
commit dfe2f253f9
3 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/m68k/ag68kgas.pas
View File

@ -71,6 +71,10 @@ interface
'trapcc','tracs','trapeq','trapf','trapge','trapgt', 'trapcc','tracs','trapeq','trapf','trapge','trapgt',
'traphi','traple','trapls','traplt','trapmi','trapne', 'traphi','traple','trapls','traplt','trapmi','trapne',
'trappl','trapt','trapvc','trapvs','unpk', 'trappl','trapt','trapvc','trapvs','unpk',
{ mc64040 instructions }
'move16',
{ coldfire v4 instructions }
'mov3q','mvz','mvs','sats',
{ fpu processor instructions - directly supported only. } { fpu processor instructions - directly supported only. }
{ ieee aware and misc. condition codes not supported } { ieee aware and misc. condition codes not supported }
'fabs','fadd', 'fabs','fadd',

4
compiler/m68k/cpubase.pas
View File

@ -64,6 +64,10 @@ unit cpubase;
a_trapcc,a_tracs,a_trapeq,a_trapf,a_trapge,a_trapgt, a_trapcc,a_tracs,a_trapeq,a_trapf,a_trapge,a_trapgt,
a_traphi,a_traple,a_trapls,a_traplt,a_trapmi,a_trapne, a_traphi,a_traple,a_trapls,a_traplt,a_trapmi,a_trapne,
a_trappl,a_trapt,a_trapvc,a_trapvs,a_unpk, a_trappl,a_trapt,a_trapvc,a_trapvs,a_unpk,
{ mc64040 instructions }
a_move16,
{ coldfire v4 instructions }
a_mov3q,a_mvz,a_mvs,a_sats,
{ fpu processor instructions - directly supported only. } { fpu processor instructions - directly supported only. }
{ ieee aware and misc. condition codes not supported } { ieee aware and misc. condition codes not supported }
a_fabs,a_fadd, a_fabs,a_fadd,

4
compiler/m68k/cpuinfo.pas
View File

@ -34,6 +34,7 @@ Type
(cpu_none, (cpu_none,
cpu_MC68000, cpu_MC68000,
cpu_MC68020, cpu_MC68020,
cpu_MC68040,
cpu_isa_a, cpu_isa_a,
cpu_isa_a_p, cpu_isa_a_p,
cpu_isa_b, cpu_isa_b,
@ -63,6 +64,7 @@ Const
cputypestr : array[tcputype] of string[8] = ('', cputypestr : array[tcputype] of string[8] = ('',
'68000', '68000',
'68020', '68020',
'68040',
'ISAA', 'ISAA',
'ISAA+', 'ISAA+',
'ISAB', 'ISAB',
@ -72,6 +74,7 @@ Const
gascputypestr : array[tcputype] of string[8] = ('', gascputypestr : array[tcputype] of string[8] = ('',
'68000', '68000',
'68020', '68020',
'68040',
'isaa', 'isaa',
'isaaplus', 'isaaplus',
'isab', 'isab',
@ -112,6 +115,7 @@ const
( { cpu_none } [], ( { cpu_none } [],
{ cpu_68000 } [CPUM68K_HAS_DBRA,CPUM68K_HAS_TAS,CPUM68K_HAS_BRAL], { cpu_68000 } [CPUM68K_HAS_DBRA,CPUM68K_HAS_TAS,CPUM68K_HAS_BRAL],
{ cpu_68020 } [CPUM68K_HAS_DBRA,CPUM68K_HAS_CAS,CPUM68K_HAS_TAS,CPUM68K_HAS_BRAL], { cpu_68020 } [CPUM68K_HAS_DBRA,CPUM68K_HAS_CAS,CPUM68K_HAS_TAS,CPUM68K_HAS_BRAL],
{ cpu_68040 } [CPUM68K_HAS_DBRA,CPUM68K_HAS_CAS,CPUM68K_HAS_TAS,CPUM68K_HAS_BRAL],
{ cpu_isaa } [], { cpu_isaa } [],
{ cpu_isaap } [CPUM68K_HAS_BRAL], { cpu_isaap } [CPUM68K_HAS_BRAL],
{ cpu_isab } [CPUM68K_HAS_TAS,CPUM68K_HAS_BRAL], { cpu_isab } [CPUM68K_HAS_TAS,CPUM68K_HAS_BRAL],