Declare the input parameters for the Guile bindings
The goal is to generate functions of the form: #+BEGIN_SRC C /* Bind to TarotMachin *function (TarotChose *input_parameter, size_t size, TarotElement *array_rewritten, TarotBidule *output_parameter); */ static SCM tarot_guile_function (SCM g_input_parameter, SCM g_array_rewritten) { TarotChose *c_input_parameter; size_t c_size; TarotElement *c_array_rewritten; TarotMachin *c_ret; TarotBidule c_output_parameter; SCM g_ret = SCM_EOL; bind_chose (g_input_parameter, c_input_parameter); bind_element_array (g_array_rewritten, &c_size, c_array_rewritten); c_ret = function (c_input_parameter, c_size, c_array_rewritten, &c_output_parameter); clean_chose (&c_input_parameter); g_ret = push_machin (g_ret, c_ret); g_ret = push_element_array (g_ret, c_size, c_array_rewritten); g_ret = push_bidule (g_ret, c_output_parameter); return g_ret; } #+END_SRC In this commit, we declare the input types.
Please register or sign in to comment