]> Repositorios git - scryer-prolog.git/commitdiff
dereference second argument of '/2
authorMark Thom <[email protected]>
Mon, 17 Jan 2022 07:00:23 +0000 (00:00 -0700)
committerMark Thom <[email protected]>
Mon, 17 Jan 2022 07:00:23 +0000 (00:00 -0700)
src/machine/system_calls.rs

index c4d4d4d640b7b671d33ade8107507496f67199f3..98130bc2ae2470aaad8a8fd3519899ccd22816fe 100644 (file)
@@ -1155,7 +1155,9 @@ impl Machine {
                 return Ok(());
             }
 
-            if let Some(next) = self.machine_st.value_to_str_like(self.machine_st.registers[2]) {
+            let target = self.machine_st.store(self.machine_st.deref(self.machine_st.registers[2]));
+
+            if let Some(next) = self.machine_st.value_to_str_like(target) {
                 if env::set_current_dir(std::path::Path::new(next.as_str())).is_ok() {
                     return Ok(());
                 }