From: Markus Triska <triska@metalevel.at>
Date: Tue, 22 Feb 2022 22:49:01 +0000 (+0100)
Subject: FIXED: library(sgml): load_html/3 and load_xml/3 now both work again.
X-Git-Tag: v0.9.0^2~16^2~1
X-Git-Url: https://git.sagredo.dev/?a=commitdiff_plain;h=d1372d9b3bfdb8835d7cdcc383a4e7ee6f42d97a;p=scryer-prolog.git

FIXED: library(sgml): load_html/3 and load_xml/3 now both work again.

This addresses #1249.
---

diff --git a/src/machine/system_calls.rs b/src/machine/system_calls.rs
index 314a35d4..becc644e 100644
--- a/src/machine/system_calls.rs
+++ b/src/machine/system_calls.rs
@@ -6003,7 +6003,7 @@ impl Machine {
 
             let tag = self.machine_st.atom_tbl.build_with(node.tag_name().name());
 
-            let result = heap_loc_as_cell!(self.machine_st.heap.len());
+            let result = str_loc_as_cell!(self.machine_st.heap.len());
 
             self.machine_st.heap.push(atom_as_cell!(atom!("element"), 3));
             self.machine_st.heap.push(atom_as_cell!(tag));
@@ -6056,7 +6056,7 @@ impl Machine {
                 );
 
                 let tag = self.machine_st.atom_tbl.build_with(name);
-                let result = heap_loc_as_cell!(self.machine_st.heap.len());
+                let result = str_loc_as_cell!(self.machine_st.heap.len());
 
                 self.machine_st.heap.push(atom_as_cell!(atom!("element"), 3));
                 self.machine_st.heap.push(atom_as_cell!(tag));