From e4409532564483d20b9a0778d61e62f43b88f758 Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Mon, 8 Mar 2010 09:19:57 +0000
Subject: [PATCH] use IsAttVar

---
 C/cdmgr.c | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/C/cdmgr.c b/C/cdmgr.c
index 23d186429..c38bd5409 100644
--- a/C/cdmgr.c
+++ b/C/cdmgr.c
@@ -4024,8 +4024,8 @@ p_is_profiled(void)
     else ta = MkAtomTerm(AtomOff);
     BIND((CELL *)t,ta,bind_is_profiled);
 #ifdef COROUTINING
-    DO_TRAIL(CellPtr(t), ta);
-    if (CellPtr(t) < H0) Yap_WakeUp((CELL *)t);
+    DO_TRAIL(VarOfTerm(t), ta);
+    if (IsAttVar(VarOfTerm(t))) Yap_WakeUp((CELL *)t);
   bind_is_profiled:
 #endif
     return(TRUE);
@@ -4127,8 +4127,8 @@ p_is_call_counted(void)
     else ta = MkAtomTerm(AtomOff);
     BIND((CELL *)t,ta,bind_is_call_counted);
 #ifdef COROUTINING
-    DO_TRAIL(CellPtr(t), ta);
-    if (CellPtr(t) < H0) Yap_WakeUp((CELL *)t);
+    DO_TRAIL(VarOfTerm(t), ta);
+    if (IsAttVar(VarOfTerm(t))) Yap_WakeUp((CELL *)t);
   bind_is_call_counted:
 #endif
     return(TRUE);