fix to support older compilers

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1377 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
rslopes 2005-08-23 15:39:38 +00:00
parent 203cb94c74
commit bafca9c692

View File

@ -157,17 +157,17 @@ OCUnify_complex(register CELL *pt0, register CELL *pt0_end,
)
{
#if SHADOW_HB
register CELL *HBREG;
HBREG = HB;
#endif
#if USE_SYSTEM_MALLOC
CELL **to_visit_max = (CELL **)Yap_PreAllocCodeSpace(), **to_visit = (CELL **)AuxSp;
#else
CELL **to_visit = (CELL **)Yap_TrailTop;
#endif
#if SHADOW_HB
register CELL *HBREG;
HBREG = HB;
#endif
loop:
while (pt0 < pt0_end) {
register CELL *ptd0 = ++pt0;