implement abolish/1
This commit is contained in:
@@ -503,6 +503,9 @@ impl Machine {
|
||||
REPLCodePtr::Retract => {
|
||||
self.retract_clause();
|
||||
}
|
||||
REPLCodePtr::AbolishClause => {
|
||||
self.abolish_clause();
|
||||
}
|
||||
}
|
||||
|
||||
self.machine_st.p = CodePtr::Local(p);
|
||||
|
||||
Reference in New Issue
Block a user