refer to structures using str_loc_as_cell! (#1311)

diff --git a/src/machine/system_calls.rs b/src/machine/system_calls.rs
index a407d7faed680420efef80ef2add8cf297544b3b..a8fdb87261a65499a8f93fb9329100bf65bc330f 100644 (file)
--- a/src/machine/system_calls.rs
+++ b/src/machine/system_calls.rs
@@ -5981,7 +5981,7 @@ impl Machine {
                     &mut self.machine_st.atom_tbl,
                 );
 
-                avec.push(heap_loc_as_cell!(self.machine_st.heap.len()));
+                avec.push(str_loc_as_cell!(self.machine_st.heap.len()));
 
                 self.machine_st.heap.push(atom_as_cell!(atom!("="), 2));
                 self.machine_st.heap.push(atom_as_cell!(name));