diff --git a/main/share/gb_reserved.h b/main/share/gb_reserved.h index 5c4208c56..fb6864e6a 100644 --- a/main/share/gb_reserved.h +++ b/main/share/gb_reserved.h @@ -65,7 +65,8 @@ enum { RST_AND, RST_NOT, RST_BCLR, - RST_MIN + RST_MIN, + RST_MOD }; #define RES_is_operator(value) (COMP_res_info[value].flag & RSF_OP) diff --git a/main/share/gb_reserved_keyword.h b/main/share/gb_reserved_keyword.h index 177736269..2df81a2c6 100644 --- a/main/share/gb_reserved_keyword.h +++ b/main/share/gb_reserved_keyword.h @@ -190,8 +190,8 @@ COMP_INFO COMP_res_info[] = { "Xor", RSF_OP2SM, OP_XOR, 0, 2, RST_AND, C_XOR }, { "\\", RSF_OP2S, OP_DIV, 0, 6, T_INTEGER, C_QUO }, { "Div", RSF_OP2S, OP_DIV, 0, 6, T_INTEGER, C_QUO }, - { "%", RSF_OP2S, OP_MOD, 0, 6, RST_AND, C_REM }, - { "Mod", RSF_OP2S, OP_MOD, 0, 6, RST_AND, C_REM }, + { "%", RSF_OP2S, OP_MOD, 0, 6, RST_MOD, C_REM }, + { "Mod", RSF_OP2S, OP_MOD, 0, 6, RST_MOD, C_REM }, { "Is", RSF_OP2|RSF_AS|RSF_NOT, OP_IS, 0, 11, T_BOOLEAN, C_IS, 0 }, { "", RSF_OP2|RSF_AS, OP_IS, 0, 11, T_BOOLEAN, C_IS, 1 }, { "Like", RSF_OP2S|RSF_NOT, OP_LIKE, 0, 4, T_BOOLEAN, C_LIKE, 0 },