correct PStrLocation offset bug in copier.rs

2020-02-20 10:59:42 -07:00
parent e5a0ba7bf3
commit d48ac09e25
2 changed files with 2 additions and 2 deletions
--- a/src/prolog/machine/copier.rs
+++ b/src/prolog/machine/copier.rs
@@ -191,7 +191,7 @@ impl<T: CopierTarget> CopyTermState<T> {
        let threshold = self.target.threshold();

        self.target[self.scan] =
-            HeapCellValue::Addr(Addr::PStrLocation(threshold, n));
+            HeapCellValue::Addr(Addr::PStrLocation(threshold, 0));

        self.scan += 1;