WIP, re issue #361

trealla-prolog · Oct 9, 2023 · 9c72eeb · 9c72eeb
1 parent 9dbcc98
commit 9c72eeb
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 6 deletions.
diff --git a/src/module.c b/src/module.c
@@ -706,11 +706,6 @@ bool do_use_module_1(module *curr_m, cell *p)
 		// There's a TCO bug manifesting with clpb:sat_rewite
 		// so this is a temporary fix...
 
-		if (!strcmp(name, "clpb"))
-			curr_m->pl->opt = false;
-		else if (!strcmp(name, "clpz"))
-			curr_m->pl->opt = false;
-
 		if (!strcmp(name, "between")
 		    || !strcmp(name, "samsort")
 		    || !strcmp(name, "terms")

diff --git a/src/query.c b/src/query.c
@@ -874,7 +874,7 @@ static bool are_slots_ok(const query *q, const frame *f)
 
 		if (is_empty(c))
 			return false;
-		else if (is_indirect(c) && !is_evaluable(c->val_ptr))
+		else if (is_indirect(c) /*&& !is_evaluable(c->val_ptr)*/)
 			return false;
 		else if (is_cstring(c) && (c->flags & FLAG_CSTR_QUANTUM_ERASER))
 			return false;