From b34be4360b2cb0e8648162102aaa4cf57800352d Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Wed, 6 Feb 2013 00:16:30 +0000
Subject: [PATCH] do not reset cintext before  cut

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

diff --git a/C/c_interface.c b/C/c_interface.c
index 0b39bfbd9..e5952e877 100644
--- a/C/c_interface.c
+++ b/C/c_interface.c
@@ -1788,7 +1788,6 @@ YAP_ExecuteOnCut(PredEntry *pe, CPredicate exec_code, struct cut_c_str *top)
     PP = pe;
     ctx->control = FRG_CUTTED;
     ctx->engine = NULL; //(PL_local_data *)Yap_regp;
-    ctx->context = NULL;
     if (pe->PredFlags & CArgsPredFlag) {
       val = execute_cargs_back(pe, exec_code, ctx PASS_REGS);
     } else {