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

fix unify_float

Browse Source
This commit is contained in:
Mark Thom
2021-12-11 16:29:26 -07:00
parent 3974b6e6cd
commit 4211151fe6
1 changed files with 11 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
src/machine/machine_state_impl.rs
View File

@@ -667,9 +667,17 @@ impl MachineState {
read_heap_cell!(value, read_heap_cell!(value,
(HeapCellValueTag::F64, f2) => { (HeapCellValueTag::F64, f2) => {
if *f1 != *f2 { self.fail = **f1 != **f2;
self.fail = true; }
} (HeapCellValueTag::Cons, cons_ptr) => {
match_untyped_arena_ptr!(cons_ptr,
(ArenaHeaderTag::F64, f2) => {
self.fail = **f1 != **F64Ptr(f2);
}
_ => {
self.fail = true;
}
);
} }
_ => { _ => {
self.fail = true; self.fail = true;