From 00c919401447c3c478cdb575f7102c3f1accf50d Mon Sep 17 00:00:00 2001
From: Costa Vitor <vitor@quasar-20.(none)>
Date: Mon, 1 Jun 2009 15:46:37 -0500
Subject: [PATCH] fix reference to Yap_regp

---
 C/c_interface.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C/c_interface.c b/C/c_interface.c
index f83534122..0e2b6a81c 100644
--- a/C/c_interface.c
+++ b/C/c_interface.c
@@ -1189,7 +1189,7 @@ YAP_Execute(PredEntry *pe, CPredicate exec_code)
   if (pe->PredFlags & SWIEnvPredFlag) {
     CPredicateV codev = (CPredicateV)exec_code;
     struct foreign_context ctx;
-    ctx.engine = (struct PL_local_data *)Yap_regp;
+    ctx.engine = NULL;
 
     return ((codev)((&ARG1)-LCL0,0,&ctx));
   }