remove DynamicIs

This commit is contained in:
Mark Thom
2018-03-17 15:01:31 -06:00
parent d8bcf47462
commit 64ab9a0337
5 changed files with 12 additions and 14 deletions

View File

@@ -304,7 +304,7 @@ impl MachineState {
Rc::new(BigInt::from_signed_bytes_le(&f(&u_n1, &u_n2).to_bytes_le()))
}
fn arith_eval_by_metacall(&self, r: RegType) -> Result<Number, Vec<HeapCellValue>>
pub(super) fn arith_eval_by_metacall(&self, r: RegType) -> Result<Number, Vec<HeapCellValue>>
{
let instantiation_err = functor!("instantiation_error", 1, [heap_atom!("(is)/2")]);
let a = self[r].clone();
@@ -1873,13 +1873,6 @@ impl MachineState {
self.p += 1;
},
&ControlInstruction::DynamicIs => {
let a = self[temp_v!(1)].clone();
let result = try_or_fail!(self, self.arith_eval_by_metacall(temp_v!(2)));
self.unify(a, Addr::Con(Constant::Number(result)));
self.p += 1;
},
&ControlInstruction::GetCleanerCall => {
let dest = self[temp_v!(1)].clone();