closure.h

Go to the documentation of this file.

 
 
#pragma once
 
#include <cx/cx.h>
#include <cx/stype/stvar.h>
#include <cx/utils/macros/args.h>
 
CX_C_BEGIN
 
// Opaque closure reference type (internal)
typedef struct closure_ref {
    void* _is_closure;
} closure_ref;
 
typedef struct closure_ref* closure;
 
typedef bool (*closureFunc)(stvlist* cvars, stvlist* args);
 
_Ret_valid_ closure _closureCreate(_In_ closureFunc func, int n, stvar cvars[]);
 
#define closureCreate(func, ...) \
    _closureCreate(func, count_macro_args(__VA_ARGS__), (stvar[]) { __VA_ARGS__ })
 
bool _closureCall(_In_ closure cls, int n, stvar args[]);
 
#define closureCall(cls, ...) \
    _closureCall(cls, count_macro_args(__VA_ARGS__), (stvar[]) { __VA_ARGS__ })
 
_Ret_valid_ closure _closureCreateAs(_In_ void (*func)(void), _In_z_ const char* sig, int n,
                                     stvar cvars[]);
 
#define closureCreateAs(sigtype, func, ...)                                                   \
    _closureCreateAs((void (*)(void))(1 ? (func) : (sigtype)0),                                \
                     #sigtype,                                                                 \
                     count_macro_args(__VA_ARGS__),                                            \
                     (stvar[]) { __VA_ARGS__ })
 
// Internal: back closureCallAs(). They are usable directly by code that needs to call a typed
// closure without the macro, but closureCallAs() is the supported way.
void (*_closureFuncAs(_In_ closure cls, _In_z_ const char* sig))(void);
_Ret_valid_ stvlist* _closureCvars(_In_ closure cls, _Out_ stvlist* storage);
 
#define closureCallAs(sigtype, cls, ...) \
    ((sigtype)_closureFuncAs((cls), #sigtype))(_closureCvars((cls), &(stvlist) { 0 }), __VA_ARGS__)
 
typedef void (*closureDestroyFunc)(stvlist* cvars);
 
void closureSetDestroy(_Inout_ closure cls, _In_opt_ closureDestroyFunc destroy);
 
_Ret_maybenull_ closure closureClone(_In_opt_ closure cls);
 
void closureDestroy(_Inout_opt_ closure* _Nullable cls);
 
// end of closure_basic group
 
CX_C_END