X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=src%2Fmarshal.c;h=f204753bfbf9190c13a0eb96f5bea4769a46f5b1;hp=31ff9ba8f8f6fcafbafc4ffeaa36eb10cf2296d1;hb=e8a409b21cb50f5931ab02ce6ab4f4406be94394;hpb=70f215a31fab4be1fe3e80125eb401e11eb02b9f

diff --git a/src/marshal.c b/src/marshal.c
index 31ff9ba..f204753 100644
--- a/src/marshal.c
+++ b/src/marshal.c
@@ -13,6 +13,17 @@ void psi_to_void(zval *return_value, set_value *set, impl_val *ret_val)
 	RETVAL_NULL();
 }
 
+void psi_to_zval(zval *return_value, set_value *set, impl_val *ret_val) {
+	RETVAL_ZVAL(ret_val->ptr, 1, 0);
+}
+
+impl_val *psi_let_zval(impl_val *tmp, decl_type *type, impl_arg *iarg, void **to_free)
+{
+	*to_free = tmp->ptr = emalloc(sizeof(zval));
+	ZVAL_COPY_VALUE(tmp->ptr, iarg->_zv);
+	return tmp;
+}
+
 void psi_to_bool(zval *return_value, set_value *set, impl_val *ret_val)
 {
 	psi_to_int(return_value, set, ret_val);
@@ -526,3 +537,4 @@ impl_val *psi_let_objval(impl_val *tmp, decl_type *type, impl_arg *iarg, void **
 
 	return tmp;
 }
+