tag DCG constructs with module names for proper resolution

This commit is contained in:
Mark Thom
2022-01-06 21:44:41 -07:00
parent addc817cca
commit 0e2db4a23e
5 changed files with 146 additions and 103 deletions
+9 -9
View File
@@ -86,21 +86,21 @@ impl MachineState {
.iter()
.filter_map(|h| {
read_heap_cell!(self.store(self.deref(heap_loc_as_cell!(*h))), //Addr::HeapCell(*h))) {
(HeapCellValueTag::AttrVar, h) => {
Some(attr_var_as_cell!(h))
}
_ => {
None
}
(HeapCellValueTag::AttrVar, h) => {
Some(attr_var_as_cell!(h))
}
_ => {
None
}
)
})
.collect();
attr_vars.sort_unstable_by(|a1, a2| {
compare_term_test!(self, *a1, *a2).unwrap_or(Ordering::Less)
});
compare_term_test!(self, *a1, *a2).unwrap_or(Ordering::Less)
});
attr_vars.dedup();
attr_vars.dedup();
attr_vars.into_iter()
}