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

fix char_offset values in add_pstr_offset_chars (#2381)

Browse Source
This commit is contained in:
Mark Thom
2024-04-10 15:46:11 -06:00
parent cf14b222f2
commit 7d6109feca
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/machine/system_calls.rs
View File

@@ -247,7 +247,7 @@ impl BrentAlgState {
self.pstr_chars += num_chars; self.pstr_chars += num_chars;
Some(CycleSearchResult::ProperList(self.num_steps())) Some(CycleSearchResult::ProperList(self.num_steps()))
} else { } else {
let char_offset = self.num_steps() + num_chars - self.max_steps as usize; let char_offset = self.max_steps as usize - self.num_steps();
self.pstr_chars += char_offset; self.pstr_chars += char_offset;
Some(CycleSearchResult::PStrLocation(self.max_steps as usize, h, char_offset + offset)) Some(CycleSearchResult::PStrLocation(self.max_steps as usize, h, char_offset + offset))
} }
@@ -260,7 +260,7 @@ impl BrentAlgState {
self.pstr_chars += num_chars - 1; self.pstr_chars += num_chars - 1;
self.step(h+1) self.step(h+1)
} else { } else {
let char_offset = self.num_steps() + num_chars - self.max_steps as usize; let char_offset = self.max_steps as usize - self.num_steps();
self.pstr_chars += char_offset; self.pstr_chars += char_offset;
Some(CycleSearchResult::PStrLocation(self.max_steps as usize, h, char_offset + offset)) Some(CycleSearchResult::PStrLocation(self.max_steps as usize, h, char_offset + offset))
} }