This is a HACK here; see comment in COptJumps.lh.
\begin{code}
-#if alpha_dec_osf1_TARGET && defined(__STG_TAILJUMPS__) && defined(__GNUC__)
+#if alpha_TARGET_ARCH && defined(__STG_TAILJUMPS__) && defined(__GNUC__)
register void *_procedure __asm__("$27");
#endif
#if (mipsel_TARGET_ARCH || mipseb_TARGET_ARCH) && defined(__STG_TAILJUMPS__) && defined(__GNUC__)
Mark (GC) register mapping:
\begin{verbatim}
- sparc m68k alpha mipseX hppa iX86 rs6000
- ----- ---- ----- ------ ---- ---- ------
+ sparc m68k alpha mipseX hppa iX86 powerpc
+ ----- ---- ----- ------ ---- ---- -------
MarkBase ebx
Mark i0 a2 $9 $16 r4 ebp
Scan (GC) register mapping:
\begin{verbatim}
- sparc m68k alpha mipseX hppa iX86 rs6000
- ----- ---- ----- ------ ---- ---- ------
+ sparc m68k alpha mipseX hppa iX86 powerpc
+ ----- ---- ----- ------ ---- ---- -------
ScanBase g4
Scan a2 $9 $16 r4 ebx
Scavenge (GC) register mapping:
\begin{verbatim}
- sparc m68k alpha mipseX hppa iX86 rs6000
- ----- ---- ----- ------ ---- ---- ------
+ sparc m68k alpha mipseX hppa iX86 powerpc
+ ----- ---- ----- ------ ---- ---- -------
ScavBase g4
Scav a2 $9 $16 r4 ebx
documentation in the porter's part of the installation guide.
\begin{verbatim}
- sparc m68k alpha mipseX hppa iX86 rs6000
- ----- ---- ----- ------ ---- ---- ------
+ sparc m68k alpha mipseX hppa iX86 powerpc
+ ----- ---- ----- ------ ---- ---- -------
BaseReg# a5 ebx
StkOReg (CONCURRENT)