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

CACHE_REGS

Browse Source
This commit is contained in:
João Santos 2012-02-07 15:18:43 +00:00
parent 3648c562fa
commit 21522ce151
4 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
C/c_interface.c
View File

@ -562,6 +562,7 @@ X_API Term STD_PROTO(YAP_ImportTerm,(char *));
static UInt
current_arity(void)
{
CACHE_REGS
if (P && PREVOP(P,Osbpp)->opc == Yap_opcode(_call_usercpred)) {
return PREVOP(P,Osbpp)->u.Osbpp.p->ArityOfPE;
} else {

3
C/compiler.c
View File

@ -2174,6 +2174,7 @@ typedef struct env_tmp {
static void
AssignPerm(PInstr *pc, compiler_struct *cglobs)
{
CACHE_REGS
int uses_var;
PInstr *opc = NULL;
#ifdef LOCALISE_VOIDS
@ -2407,6 +2408,7 @@ typedef struct {
static void
CheckUnsafe(PInstr *pc, compiler_struct *cglobs)
{
CACHE_REGS
int pending = 0;
/* say that all variables are yet to initialise */
@ -2750,6 +2752,7 @@ copy_live_temps_bmap(int max, compiler_struct *cglobs)
static void
c_layout(compiler_struct *cglobs)
{
CACHE_REGS
PInstr *savepc = cglobs->BodyStart->nextInst;
register Ventry *v = cglobs->vtable;
Int *up = cglobs->Uses;

1
C/errors.c
View File

@ -33,6 +33,7 @@
void
Yap_RestartYap ( int flag )
{
CACHE_REGS
#if PUSH_REGS
restore_absmi_regs(&Yap_standard_regs);
#endif

2
library/dialect/swi/fli/swi.c
View File

@ -1796,7 +1796,7 @@ PL_skip_list(term_t list, term_t tail, size_t *len)
if ( len )
*len = length;
if ( tail )
{ Term t2 = Yap_GetFromSlot(tail);
{ Term t2 = Yap_GetFromSlot(tail PASS_REGS);
Yap_unify(t2, *t);
}