fix gcc optimisation bug

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1072 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2004-06-09 03:30:29 +00:00 · 2004-06-09 03:30:29 +00:00 · b1013c05f9
commit b1013c05f9
parent b25690af56
1 changed files with 2 additions and 3 deletions
--- a/H/absmi.h
+++ b/H/absmi.h
@ -895,15 +895,14 @@ Macros to check the limits of stacks
 #endif /* TABLING */

 #define pop_yaam_regs()                                           \
-                 { register CELL *ptr1;                           \
+                 {                                                \
                   H = PROTECT_FROZEN_H(B_YREG);                  \
 		   B = B_YREG->cp_b;	                          \
                   pop_yaam_reg_cpdepth(B_YREG);                  \
 		   CPREG = B_YREG->cp_cp;		          \
-		   ptr1 = B_YREG->cp_env;			  \
+		   ENV = B_YREG->cp_env;			  \
                   TABLING_close_alt(B_YREG);	                  \
                   HBREG = PROTECT_FROZEN_H(B);		          \
-                   ENV = ptr1;                                    \
                 }

 #define pop_args(NArgs)                                           \