fix setup_call_cleanup bug

This commit is contained in:
Mark Thom
2018-02-01 23:39:03 -07:00
parent 7b5a2786da
commit 9c2e8dfd72
4 changed files with 17 additions and 12 deletions

View File

@@ -1466,7 +1466,7 @@ impl MachineState {
_ => {
self.num_of_args = 2;
self.b0 = self.b;
self.p = CodePtr::DirEntry(361); // goto sgc_on_success/2, 361.
self.p = CodePtr::DirEntry(364); // goto sgc_on_success/2, 364.
}
};
},
@@ -1797,7 +1797,7 @@ impl MachineState {
self.cp = self.p;
self.num_of_args = 0;
self.b0 = self.b;
self.p = CodePtr::DirEntry(349); // goto_call run_cleaners_without_handling/0.
self.p = CodePtr::DirEntry(352); // goto_call run_cleaners_without_handling/0.
}
}
}