From 7e15ee33a2608b4b67f28d987aaeb815c118f044 Mon Sep 17 00:00:00 2001 From: Water-Melon Date: Fri, 9 Feb 2024 17:57:24 +0000 Subject: [PATCH] refactor(lang_bool): use function templates to define functions --- src/mln_lang_bool.c | 253 +++++++++++++++++++++++++------------------- 1 file changed, 145 insertions(+), 108 deletions(-) diff --git a/src/mln_lang_bool.c b/src/mln_lang_bool.c index 95fd8f2f..7277f9fa 100644 --- a/src/mln_lang_bool.c +++ b/src/mln_lang_bool.c @@ -4,6 +4,7 @@ */ #include "mln_lang_bool.h" #include +#include "mln_func.h" #ifdef __DEBUG__ #include @@ -163,8 +164,9 @@ static mln_string_t mln_lang_bool_opr_names[] = { mln_string("__bool_pdec_operator__"), }; -static int -mln_lang_bool_assign(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_assign, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[0], ret, op1, op2); @@ -178,10 +180,11 @@ mln_lang_bool_assign(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t * } *ret = mln_lang_var_ref(op1); return 0; -} +}) -static int -mln_lang_bool_pluseq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_pluseq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[1], ret, op1, op2); @@ -205,10 +208,11 @@ mln_lang_bool_pluseq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t * return -1; } return handler(ctx, ret, op1, op2); -} +}) -static int -mln_lang_bool_subeq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_subeq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[2], ret, op1, op2); @@ -217,10 +221,11 @@ mln_lang_bool_subeq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *o } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_lmoveq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_lmoveq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[3], ret, op1, op2); @@ -229,10 +234,11 @@ mln_lang_bool_lmoveq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t * } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_rmoveq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_rmoveq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[4], ret, op1, op2); @@ -241,10 +247,11 @@ mln_lang_bool_rmoveq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t * } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_muleq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_muleq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[5], ret, op1, op2); @@ -253,10 +260,11 @@ mln_lang_bool_muleq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *o } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_diveq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_diveq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[6], ret, op1, op2); @@ -265,10 +273,11 @@ mln_lang_bool_diveq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *o } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_oreq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_oreq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[7], ret, op1, op2); @@ -277,10 +286,11 @@ mln_lang_bool_oreq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_andeq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_andeq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[8], ret, op1, op2); @@ -289,10 +299,11 @@ mln_lang_bool_andeq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *o } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_xoreq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_xoreq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[9], ret, op1, op2); @@ -301,10 +312,11 @@ mln_lang_bool_xoreq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *o } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_modeq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_modeq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[10], ret, op1, op2); @@ -313,10 +325,11 @@ mln_lang_bool_modeq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *o } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_cor(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_cor, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[11], ret, op1, op2); @@ -325,10 +338,11 @@ mln_lang_bool_cor(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1 } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_cand(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_cand, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[12], ret, op1, op2); @@ -337,10 +351,11 @@ mln_lang_bool_cand(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_cxor(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_cxor, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[13], ret, op1, op2); @@ -349,10 +364,11 @@ mln_lang_bool_cxor(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_equal(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_equal, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[14], ret, op1, op2); @@ -374,10 +390,11 @@ mln_lang_bool_equal(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *o } } return 0; -} +}) -static int -mln_lang_bool_nonequal(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_nonequal, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[15], ret, op1, op2); @@ -399,10 +416,11 @@ mln_lang_bool_nonequal(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t } } return 0; -} +}) -static int -mln_lang_bool_less(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_less, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[16], ret, op1, op2); @@ -411,10 +429,11 @@ mln_lang_bool_less(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_lesseq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_lesseq, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[17], ret, op1, op2); @@ -423,10 +442,11 @@ mln_lang_bool_lesseq(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t * } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_grea(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_grea, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[18], ret, op1, op2); @@ -435,10 +455,11 @@ mln_lang_bool_grea(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_greale(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_greale, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[19], ret, op1, op2); @@ -447,10 +468,11 @@ mln_lang_bool_greale(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t * } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_lmov(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_lmov, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[20], ret, op1, op2); @@ -459,10 +481,11 @@ mln_lang_bool_lmov(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_rmov(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_rmov, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[21], ret, op1, op2); @@ -471,10 +494,11 @@ mln_lang_bool_rmov(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_plus(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_plus, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[22], ret, op1, op2); @@ -498,10 +522,11 @@ mln_lang_bool_plus(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op return -1; } return handler(ctx, ret, op1, op2); -} +}) -static int -mln_lang_bool_sub(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_sub, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[23], ret, op1, op2); @@ -510,10 +535,11 @@ mln_lang_bool_sub(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1 } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_mul(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_mul, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[24], ret, op1, op2); @@ -522,10 +548,11 @@ mln_lang_bool_mul(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1 } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_div(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_div, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[25], ret, op1, op2); @@ -534,10 +561,11 @@ mln_lang_bool_div(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1 } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_mod(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_mod, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[26], ret, op1, op2); @@ -546,10 +574,11 @@ mln_lang_bool_mod(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1 } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_sdec(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_sdec, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[27], ret, op1, op2); @@ -558,10 +587,11 @@ mln_lang_bool_sdec(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_sinc(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_sinc, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[28], ret, op1, op2); @@ -570,10 +600,11 @@ mln_lang_bool_sinc(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_index(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_index, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[29], ret, op1, op2); @@ -582,10 +613,11 @@ mln_lang_bool_index(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *o } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_property(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_property, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[30], ret, op1, op2); @@ -594,10 +626,11 @@ mln_lang_bool_property(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_negative(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_negative, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[31], ret, op1, op2); @@ -606,10 +639,11 @@ mln_lang_bool_negative(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_reverse(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_reverse, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[32], ret, op1, op2); @@ -618,10 +652,11 @@ mln_lang_bool_reverse(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_not(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_not, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[33], ret, op1, op2); @@ -641,10 +676,11 @@ mln_lang_bool_not(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1 } } return 0; -} +}) -static int -mln_lang_bool_pinc(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_pinc, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[34], ret, op1, op2); @@ -653,10 +689,11 @@ mln_lang_bool_pinc(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +}) -static int -mln_lang_bool_pdec(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2) +MLN_FUNC(static, int, mln_lang_bool_pdec, \ + (mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op1, mln_lang_var_t *op2), \ + (ctx, ret, op1, op2), \ { if (ctx->op_bool_flag) { int rc = mln_lang_funccall_val_operator(ctx, &mln_lang_bool_opr_names[35], ret, op1, op2); @@ -665,5 +702,5 @@ mln_lang_bool_pdec(mln_lang_ctx_t *ctx, mln_lang_var_t **ret, mln_lang_var_t *op } mln_lang_errmsg(ctx, "Operation NOT support."); return -1; -} +})