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

add fixes, further test cases.

Browse Source
This commit is contained in:
Mark Thom
2018-02-25 22:38:28 -07:00
parent 82f0f7c7fe
commit c133931134
6 changed files with 29 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -1218,6 +1218,10 @@ impl MachineState {
self.compare_numbers(cmp, n1, n2);
},
&BuiltInInstruction::DefaultSetCutPoint(r) => {
let mut default_cut_policy = DefaultCutPolicy {};
default_cut_policy.cut(self, r);
},
&BuiltInInstruction::DefaultTrustMe => {
let mut call_policy = DefaultCallPolicy {};
try_or_fail!(self, call_policy.trust_me(self));
@@ -1472,7 +1476,9 @@ impl MachineState {
self.p += 1;
},
&BuiltInInstruction::SetCutPoint(r) => {
&BuiltInInstruction::SetCutPoint(r) =>
cut_policy.cut(self, r),
/*{
let addr = self.store(self.deref(self[r].clone()));
match addr {
@@ -1487,7 +1493,7 @@ impl MachineState {
},
_ => self.fail = true
};
},
},*/
&BuiltInInstruction::CleanUpBlock => {
let nb = self.store(self.deref(self[temp_v!(1)].clone()));