rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

re: #75, #52

Browse Source
This commit is contained in:
Mark Thom
2019-03-31 22:30:42 -06:00
parent df5e538dc6
commit 2240418a25
6 changed files with 32 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/prolog/machine/machine_state_impl.rs
View File

@@ -14,7 +14,7 @@ use prolog::machine::or_stack::*;
use prolog::machine::machine_errors::*;
use prolog::machine::machine_indices::*;
use prolog::machine::machine_state::*;
use prolog::num::{Integer, Signed, ToPrimitive, Zero};
use prolog::num::{Integer, Signed, ToPrimitive, One, Zero};
use prolog::num::bigint::{BigInt, BigUint};
use prolog::num::rational::Ratio;
@@ -1913,6 +1913,13 @@ impl MachineState {
match d {
Addr::Con(Constant::Number(Number::Integer(_))) => self.p += 1,
Addr::Con(Constant::CharCode(_)) => self.p += 1,
Addr::Con(Constant::Number(Number::Rational(r))) =>
if r.denom() == &BigInt::one() {
self.p += 1;
} else {
self.fail = true;
},
_ => self.fail = true
};
},