fix string incompleteness (#1828)
This commit is contained in:
@@ -181,7 +181,7 @@ impl<'a> HeapPStrIter<'a> {
|
|||||||
self.brent_st.hare = result.focus;
|
self.brent_st.hare = result.focus;
|
||||||
} else {
|
} else {
|
||||||
read_heap_cell!(self.heap[result.focus],
|
read_heap_cell!(self.heap[result.focus],
|
||||||
(HeapCellValueTag::Lis | HeapCellValueTag::Str) => {
|
(HeapCellValueTag::Lis | HeapCellValueTag::Str | HeapCellValueTag::PStr) => {
|
||||||
self.focus = self.heap[self.brent_st.hare];
|
self.focus = self.heap[self.brent_st.hare];
|
||||||
}
|
}
|
||||||
_ => {
|
_ => {
|
||||||
|
|||||||
Reference in New Issue
Block a user