Function c_call_block_impl

tutorials/integration/c/04_callbacks.c:124–146

----------------------------------------------------------------------- ----------------------------------------------------------------------- Interop: c_call_block — receives a block and calls it daslang signature: def c_call_block(callback : block<(a:int; b:float) : string>; a : int; b : float) : string Mangled: "s 0 $ i f" "0 $" — block (stack-allocated, $ suffix) "i" — int argument

// the first argument.  Just pass the actual arguments.
// -----------------------------------------------------------------------
vec4f c_call_block_impl(das_context * ctx, das_node * node, vec4f * args) {
    (void)node;
    das_block * block = das_argument_block(args[0]);
    int    a = das_argument_int(args[1]);
    float  b = das_argument_float(args[2]);

    printf("[C] calling block with (%d, %.2f)\n", a, b);

    vec4f blk_args[2];
    blk_args[0] = das_result_int(a);
    blk_args[1] = das_result_float(b);

    vec4f ret = das_context_eval_block(ctx, block, blk_args);
    char * ex = das_context_get_exception(ctx);
    if (ex) {
        printf("[C] exception in block: %s\n", ex);
        return das_result_string(NULL);
    }

    char * str = das_argument_string(ret);
    printf("[C] block returned: \"%s\"\n", str);
    return ret;
}

// -----------------------------------------------------------------------
// Module registration