fix gcc optimisation bug
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1072 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
b25690af56
commit
b1013c05f9
@ -895,15 +895,14 @@ Macros to check the limits of stacks
|
|||||||
#endif /* TABLING */
|
#endif /* TABLING */
|
||||||
|
|
||||||
#define pop_yaam_regs() \
|
#define pop_yaam_regs() \
|
||||||
{ register CELL *ptr1; \
|
{ \
|
||||||
H = PROTECT_FROZEN_H(B_YREG); \
|
H = PROTECT_FROZEN_H(B_YREG); \
|
||||||
B = B_YREG->cp_b; \
|
B = B_YREG->cp_b; \
|
||||||
pop_yaam_reg_cpdepth(B_YREG); \
|
pop_yaam_reg_cpdepth(B_YREG); \
|
||||||
CPREG = B_YREG->cp_cp; \
|
CPREG = B_YREG->cp_cp; \
|
||||||
ptr1 = B_YREG->cp_env; \
|
ENV = B_YREG->cp_env; \
|
||||||
TABLING_close_alt(B_YREG); \
|
TABLING_close_alt(B_YREG); \
|
||||||
HBREG = PROTECT_FROZEN_H(B); \
|
HBREG = PROTECT_FROZEN_H(B); \
|
||||||
ENV = ptr1; \
|
|
||||||
}
|
}
|
||||||
|
|
||||||
#define pop_args(NArgs) \
|
#define pop_args(NArgs) \
|
||||||
|
Reference in New Issue
Block a user