Browse Source

instead of supporting SP only, have register A7 defined, and have SP as an alias

git-svn-id: trunk@27572 -
Károly Balogh 11 năm trước cách đây
mục cha
commit
7ee09b9620

+ 2 - 0
compiler/m68k/cpubase.pas

@@ -111,12 +111,14 @@ unit cpubase;
     const
       { Available Superregisters }
       {$i r68ksup.inc}
+      RS_SP = RS_A7;
 
       { ? whatever... }
       R_SUBWHOLE = R_SUBNONE;
 
       { Available Registers }
       {$i r68kcon.inc}
+      NR_SP = NR_A7;
 
       { Integer Super registers first and last }
       first_int_imreg = RS_D7+1;

+ 1 - 1
compiler/m68k/m68kreg.dat

@@ -41,4 +41,4 @@ A3,$06,$03,a3,%a3,11
 A4,$06,$04,a4,%a4,12
 A5,$06,$05,a5,%a5,13
 A6,$06,$06,a6,%a6,14
-SP,$06,$07,sp,%sp,15
+A7,$06,$07,a7,%a7,15

+ 1 - 1
compiler/m68k/r68kcon.inc

@@ -32,4 +32,4 @@ NR_A3 = tregister($06000003);
 NR_A4 = tregister($06000004);
 NR_A5 = tregister($06000005);
 NR_A6 = tregister($06000006);
-NR_SP = tregister($06000007);
+NR_A7 = tregister($06000007);

+ 1 - 1
compiler/m68k/r68kgas.inc

@@ -32,4 +32,4 @@
 '%a4',
 '%a5',
 '%a6',
-'%sp'
+'%a7'

+ 1 - 1
compiler/m68k/r68kgri.inc

@@ -6,6 +6,7 @@
 30,
 31,
 32,
+33,
 18,
 1,
 2,
@@ -28,7 +29,6 @@
 25,
 17,
 23,
-33,
 20,
 21,
 24,

+ 1 - 1
compiler/m68k/r68ksri.inc

@@ -7,6 +7,7 @@
 30,
 31,
 32,
+33,
 18,
 1,
 2,
@@ -29,7 +30,6 @@
 25,
 17,
 23,
-33,
 20,
 21,
 24

+ 1 - 1
compiler/m68k/r68kstd.inc

@@ -32,4 +32,4 @@
 'a4',
 'a5',
 'a6',
-'sp'
+'a7'

+ 1 - 1
compiler/m68k/r68ksup.inc

@@ -32,4 +32,4 @@ RS_A3 = $03;
 RS_A4 = $04;
 RS_A5 = $05;
 RS_A6 = $06;
-RS_SP = $07;
+RS_A7 = $07;