From: Mark Thom <markjordanthom@gmail.com>
Date: Thu, 3 May 2018 03:54:09 +0000 (-0600)
Subject: remove unnecessary store/deref in keysort error checking
X-Git-Tag: v0.8.110~478
X-Git-Url: https://git.sagredo.dev/?a=commitdiff_plain;h=df1421dae8c13013a6b8c45f4c5d741c511edc70;p=scryer-prolog.git

remove unnecessary store/deref in keysort error checking
---

diff --git a/src/prolog/machine/machine_errors.rs b/src/prolog/machine/machine_errors.rs
index 11861291..01a699fd 100644
--- a/src/prolog/machine/machine_errors.rs
+++ b/src/prolog/machine/machine_errors.rs
@@ -71,7 +71,7 @@ impl MachineState {
                         };
                     }
 
-                    addr = self.store(self.deref(Addr::HeapCell(l + 1)));
+                    addr = Addr::HeapCell(l + 1);
                 }
 
                 Ok(())