From 9f48ee334e8dbcb96be7592099fc4b51fba89dee Mon Sep 17 00:00:00 2001 From: fennecdjay Date: Tue, 24 Sep 2019 21:15:11 +0200 Subject: [PATCH] :art: Remove useless unary_uniq op checker --- include/import.h | 1 - src/lib/opfunc.c | 9 --------- src/lib/prim.c | 4 ---- tests/error/unary_uniq.gw | 2 -- 4 files changed, 16 deletions(-) delete mode 100644 tests/error/unary_uniq.gw diff --git a/include/import.h b/include/import.h index 3122f6ff..8db7f574 100644 --- a/include/import.h +++ b/include/import.h @@ -72,7 +72,6 @@ ANN Type_Decl* str2decl(const Env, const m_str, m_uint* depth); OP_CHECK(opck_const_rhs); OP_CHECK(opck_unary_meta); OP_CHECK(opck_unary_meta2); -OP_CHECK(opck_unary_meta2_uniq); OP_CHECK(opck_unary); OP_CHECK(opck_post); OP_CHECK(opck_rassign); diff --git a/src/lib/opfunc.c b/src/lib/opfunc.c index 0f4a9dfc..5053d515 100644 --- a/src/lib/opfunc.c +++ b/src/lib/opfunc.c @@ -69,15 +69,6 @@ OP_CHECK(opck_unary_meta2) { return t_int; } -OP_CHECK(opck_unary_meta2_uniq) { - const Exp_Unary* unary = (Exp_Unary*)data; - CHECK_OO(opck_unary_meta2(env, data, mut)) - if(unary->exp->next) - ERR_N(exp_self(unary)->pos, - _("'%s' must be applied to a unique expression"), s_name(unary->op)) - return t_int; -} - OP_CHECK(opck_unary) { const Exp_Unary* unary = (Exp_Unary*)data; if(unary->exp->meta != ae_meta_var) diff --git a/src/lib/prim.c b/src/lib/prim.c index 295e6809..3f4fc03a 100644 --- a/src/lib/prim.c +++ b/src/lib/prim.c @@ -62,7 +62,6 @@ static GWION_IMPORT(int_unary) { GWI_BB(gwi_oper_ini(gwi, NULL, "int", "int")) GWI_BB(gwi_oper_add(gwi, opck_unary_meta)) GWI_BB(gwi_oper_end(gwi, "-", int_negate)) - GWI_BB(gwi_oper_add(gwi, opck_unary_meta2_uniq)) GWI_BB(gwi_oper_end(gwi, "!", IntNot)) CHECK_OP("++", unary, pre_inc) CHECK_OP("--", unary, pre_dec) @@ -273,11 +272,8 @@ static GWION_IMPORT(float) { GWI_BB(gwi_oper_ini(gwi, NULL, "float", "float")) CHECK_FF("-", unary_meta, negate) GWI_BB(gwi_oper_ini(gwi, NULL, "float", "int")) - CHECK_FF("!", unary_meta2_uniq, not) GWI_BB(gwi_oper_ini(gwi, NULL, "time", "int")) - CHECK_FF("!", unary_meta2_uniq, not) GWI_BB(gwi_oper_ini(gwi, NULL, "dur", "int")) - CHECK_FF("!", unary_meta2_uniq, not) GWI_BB(gwi_oper_ini(gwi, "int", "dur", "dur")) GWI_BB(gwi_oper_end(gwi, "::", int_float_mul)) GWI_BB(gwi_oper_ini(gwi, "float", "dur", "dur")) diff --git a/tests/error/unary_uniq.gw b/tests/error/unary_uniq.gw deleted file mode 100644 index 548cfe0e..00000000 --- a/tests/error/unary_uniq.gw +++ /dev/null @@ -1,2 +0,0 @@ -#! [contains] must be applied to a unique expression -!(1,2); -- 2.43.0