allow abolish_clause to abolish empty dynamic clauses (#3010)

This commit is contained in:
Mark Thom
2025-07-20 16:55:07 -07:00
parent 4aa2a45736
commit 65dda019a2

View File

@@ -2120,14 +2120,16 @@ impl Machine {
.indices .indices
.remove_predicate_skeleton(&compilation_target, &key) .remove_predicate_skeleton(&compilation_target, &key)
.map(|skeleton| { .map(|skeleton| {
let mut clause_clause_skeleton = loader let mut clause_clause_skeleton =
.wam_prelude match loader.wam_prelude.indices.remove_predicate_skeleton(
.indices
.remove_predicate_skeleton(
&clause_clause_compilation_target, &clause_clause_compilation_target,
&(atom!("$clause"), 2), &(atom!("$clause"), 2),
) ) {
.unwrap(); Some(skeleton) => skeleton,
None => {
return vec![];
}
};
let result = skeleton let result = skeleton
.core .core