has_tail must be false for use as a filename from open/{3,4}

diff --git a/src/machine/system_calls.rs b/src/machine/system_calls.rs
index 1ffa227e4b5814326574f4325f0a19da25874205..af8e3e7e911684595768a2c6a968bd28aa7170c8 100644 (file)
--- a/src/machine/system_calls.rs
+++ b/src/machine/system_calls.rs
@@ -3111,7 +3111,7 @@ impl MachineState {
                         self.stream_from_file_spec(atom, indices, &options)?
                     }
                     Addr::PStrLocation(h, n) => match &self.heap[h] {
-                        &HeapCellValue::PartialString(_, true) => {
+                        &HeapCellValue::PartialString(_, _has_tail @ false) => {
                             let mut heap_pstr_iter = self.heap_pstr_iter(Addr::PStrLocation(h, n));
 
                             let file_spec = clause_name!(heap_pstr_iter.to_string(), self.atom_tbl);