no need to check the array, the 2nd NOT is a NOT_F

diff --git a/parser.c b/parser.c
index f7bcad11fbe7c3fc39cd77d1f5814cc56eb0ab48..56810c3bf50413cdd9f3c0027193cd5a8c9ef696 100644 (file)
--- a/parser.c
+++ b/parser.c
@@ -904,7 +904,7 @@ static bool parser_sy_apply_operator(parser_t *parser, shunt *sy)
                             }
                             out = (ast_expression*)ast_unary_new(ctx, type_not_instr[exprs[i]->expression.vtype], exprs[i]);
                             if (!out) break;
-                            out = (ast_expression*)ast_unary_new(ctx, type_not_instr[exprs[i]->expression.vtype], out);
+                            out = (ast_expression*)ast_unary_new(ctx, NOT_F, out);
                             if (!out) break;
                             exprs[i] = out; out = NULL;
                             if (OPTS_FLAG(PERL_LOGIC)) {