diff --git a/include/with99.h b/include/with99.h index 6c878a9..a669f37 100644 --- a/include/with99.h +++ b/include/with99.h @@ -48,10 +48,14 @@ #define WITH99_priv_create_stmt_IMPL(tResNameArgs)\ ML99_TERMS(\ - ML99_appl(ML99_reify(v(ML99_INTRODUCE_VAR_TO_STMT)),\ - ML99_call(v(WITH99_priv_declare_resource),\ - v(tResNameArgs)\ - )\ + ML99_if(\ + ML99_variadicsIsSingle(ML99_call(v(WITH99_priv_restype), 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_call(\