Allow defining resources that do not introduce variables.

This commit is contained in:
bʰedoh₂ swé 2025-04-08 00:20:54 +05:00
parent 2c1d945e5f
commit 5fafe9905b

View File

@ -48,10 +48,14 @@
#define WITH99_priv_create_stmt_IMPL(tResNameArgs)\ #define WITH99_priv_create_stmt_IMPL(tResNameArgs)\
ML99_TERMS(\ ML99_TERMS(\
ML99_appl(ML99_reify(v(ML99_INTRODUCE_VAR_TO_STMT)),\ ML99_if(\
ML99_call(v(WITH99_priv_declare_resource),\ ML99_variadicsIsSingle(ML99_call(v(WITH99_priv_restype), v(tResNameArgs))),\
v(tResNameArgs)\ ML99_appl(ML99_reify(v(ML99_INTRODUCE_VAR_TO_STMT)),\
)\ ML99_call(v(WITH99_priv_declare_resource),\
v(tResNameArgs)\
)\
),\
v()\
),\ ),\
ML99_boolMatchWithArgs(\ ML99_boolMatchWithArgs(\
ML99_call(\ ML99_call(\