rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

replace deprecated unify_complete_string call with allocate_cstr

Browse Source
This commit is contained in:
Mark Thom
2025-04-27 22:27:12 -07:00
committed by Mark Thom
parent a9847eef65
commit 4e0493474e
1 changed files with 14 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
src/machine/system_calls.rs
View File

@@ -5115,9 +5115,10 @@ impl Machine {
let result_reg = self.deref_register(2);
if let Some(code) = self.machine_st.value_to_str_like(code) {
match js_sys::eval(&code.as_str()) {
Ok(result) => self.unify_js_value(result, result_reg),
Err(result) => self.unify_js_value(result, result_reg),
Ok(result) => self.unify_js_value(result, result_reg)?,
Err(result) => self.unify_js_value(result, result_reg)?,
};
return Ok(());
}
self.machine_st.fail = true;
@@ -5125,7 +5126,11 @@ impl Machine {
}
#[cfg(target_arch = "wasm32")]
fn unify_js_value(&mut self, result: wasm_bindgen::JsValue, result_reg: HeapCellValue) {
fn unify_js_value(
&mut self,
result: wasm_bindgen::JsValue,
result_reg: HeapCellValue,
) -> CallResult {
match result.as_bool() {
Some(result) => match result {
true => self.machine_st.unify_atom(atom!("true"), result_reg),
@@ -5138,8 +5143,10 @@ impl Machine {
}
None => match result.as_string() {
Some(result) => {
let result = AtomTable::build_with(&self.machine_st.atom_tbl, &result);
self.machine_st.unify_complete_string(result, result_reg);
resource_error_call_result!(
self.machine_st,
self.machine_st.heap.allocate_cstr(result.as_str())
);
}
None => {
if result.is_null() {
@@ -5164,6 +5171,8 @@ impl Machine {
},
},
}
Ok(())
}
#[inline(always)]