From 783c5ed6bc91c35aae034b529a449a5b257b89bf Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?V=C3=ADtor=20Manuel=20de=20Morais=20Santos=20Costa?=
 <vsc@xato.(none)>
Date: Fri, 4 Dec 2009 22:58:46 +0000
Subject: [PATCH] fix excessive untrailing in C-code interface (obs from Nuno
 Fonseca).

---
 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 010dc0a90..161bbcc5e 100644
--- a/C/c_interface.c
+++ b/C/c_interface.c
@@ -1917,9 +1917,9 @@ YAP_PruneGoal(void)
   while (B->cp_ap != NOCODE) {
     B = B->cp_b;
   }
+  Yap_TrimTrail();
   B = B->cp_b;
 
-  Yap_TrimTrail();
   RECOVER_B();
 }