fix cut predicate in YapOr and ThOr

2012-02-27 17:18:01 +00:00
parent 21522ce151
commit 553fbc505f
6 changed files with 118 additions and 14 deletions
--- a/OPTYap/or.macros.h
+++ b/OPTYap/or.macros.h
@@ -172,7 +172,7 @@ STD_PROTO(static inline qg_sol_fr_ptr CUT_prune_solution_frames, (qg_sol_fr_ptr,
 #define CUT_prune_to(PRUNE_CP)                           \
        if (YOUNGER_CP(Get_LOCAL_top_cp(), PRUNE_CP)) {  \
          if (! Get_LOCAL_prune_request())               \
-	    prune_shared_branch(PRUNE_CP);               \
+	    prune_shared_branch(PRUNE_CP, NULL);         \
 	  PRUNE_CP = Get_LOCAL_top_cp();	         \
        }