correct abolish/1
This commit is contained in:
@@ -69,8 +69,7 @@ impl Machine {
|
||||
set_code_index!(idx, IndexPtr::Undefined, clause_name!("user"));
|
||||
}
|
||||
|
||||
self.indices.code_dir.remove(&(name.clone(), arity));
|
||||
self.indices.dynamic_code_dir.remove(&(name, arity));
|
||||
self.indices.remove_code_index((name, arity));
|
||||
}
|
||||
|
||||
fn handle_eval_result_from_dynamic_compile(&mut self, pred_str: String, name: ClauseName,
|
||||
|
||||
@@ -103,11 +103,8 @@ impl SubModuleUser for IndexStore {
|
||||
|
||||
fn remove_code_index(&mut self, key: PredicateKey)
|
||||
{
|
||||
self.code_dir.remove(&key);
|
||||
|
||||
if self.dynamic_code_dir.contains_key(&key) {
|
||||
self.dynamic_code_dir.remove(&key);
|
||||
}
|
||||
self.code_dir.remove(&key);
|
||||
self.dynamic_code_dir.remove(&key);
|
||||
}
|
||||
|
||||
fn insert_dir_entry(&mut self, name: ClauseName, arity: usize, idx: ModuleCodeIndex)
|
||||
|
||||
Reference in New Issue
Block a user