Fix for use_module as/2 import option

trealla-prolog · Nov 7, 2024 · fe53ae7 · fe53ae7
1 parent 8b5b997
commit fe53ae7
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 17 deletions.
diff --git a/src/internal.h b/src/internal.h
@@ -444,7 +444,6 @@ struct rule_ {
 
 struct predicate_ {
 	lnode hdr;							// must be first
-	predicate *alias;
 	rule *head, *tail;
 	module *m;
 	skiplist *idx, *idx2;

diff --git a/src/query.c b/src/query.c
@@ -1240,12 +1240,6 @@ bool match_rule(query *q, cell *p1, pl_idx p1_ctx, enum clause_type is_retract)
 			q->st.curr_rule = NULL;
 			return false;
 		}
-
-		if (pr->alias) {
-			c->val_off = pr->alias->key.val_off;
-			pr = pr->alias;
-		}
-
 		if (!pr->is_dynamic)
 			return throw_error(q, c, c_ctx, "permission_error", "modify,static_procedure");
 
@@ -1344,11 +1338,6 @@ bool match_clause(query *q, cell *p1, pl_idx p1_ctx, enum clause_type is_retract
 			return false;
 		}
 
-		if (pr->alias) {
-			c->val_off = pr->alias->key.val_off;
-			pr = pr->alias;
-		}
-
 		if (!pr->is_dynamic) {
 			if (is_retract == DO_CLAUSE) {
 				if (!q->access_private)
@@ -1428,11 +1417,6 @@ static bool match_head(query *q)
 				return false;
 			}
 
-			if (pr->alias) {
-				c->val_off = pr->alias->key.val_off;
-				pr = pr->alias;
-			}
-
 			c->match = pr;
 		}