diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

gcc -g -O would choke on alphas if $15 was in use (egcs).

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@196 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2001-11-25 19:48:34 +00:00
parent 7f20ca1dda
commit 377e63b038
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
H/Regs.h
View File

@ -10,7 +10,7 @@
* File: Regs.h * * File: Regs.h *
* mods: * * mods: *
* comments: YAP abstract machine registers * * comments: YAP abstract machine registers *
* version: $Id: Regs.h,v 1.6 2001-11-15 00:01:43 vsc Exp $ * * version: $Id: Regs.h,v 1.7 2001-11-25 19:48:34 vsc Exp $ *
*************************************************************************/ *************************************************************************/
@ -254,8 +254,13 @@ register CELL *HB asm ("$10");
register choiceptr B asm ("$11"); register choiceptr B asm ("$11");
register yamop *CP asm ("$12"); register yamop *CP asm ("$12");
register CELL *S asm ("$13"); register CELL *S asm ("$13");
register CELL CreepFlag asm ("$14"); register tr_fr_ptr TR asm ("$14");
register tr_fr_ptr TR asm ("$15"); /* gcc+debug chokes if $15 is in use on alphas */
#ifdef DEBUG
#define CreepFlag REGS.CreepFlag_
#else
register CELL CreepFlag asm ("$15");
#endif
/* Interface with foreign code, make sure the foreign code sees all the /* Interface with foreign code, make sure the foreign code sees all the
registers the way they used to be */ registers the way they used to be */