aboutsummaryrefslogtreecommitdiff
path: root/interpreter
diff options
context:
space:
mode:
authorCamil Staps2016-08-28 19:16:40 +0200
committerCamil Staps2016-08-28 19:16:40 +0200
commit90b32c52adde70e56129f483585d9180647bbd26 (patch)
treede51b5c2ccd3a18dceefccf3278d97cfad117ff7 /interpreter
parentAdds an import construct; resolves #1 (diff)
Removed useless code
Diffstat (limited to 'interpreter')
-rw-r--r--interpreter/eval.c5
1 files changed, 1 insertions, 4 deletions
diff --git a/interpreter/eval.c b/interpreter/eval.c
index 44fda96..f0761fb 100644
--- a/interpreter/eval.c
+++ b/interpreter/eval.c
@@ -152,11 +152,9 @@ char match_rule(fuspel* rules, rewrite_rule* rule, expression* expr,
expression* _expr = expr_args[++i];
arg_list* args = rule->args;
unsigned char args_len = len_arg_list(args);
- fuspel* _rules = rules;
while (!empty_args_list(args)) {
- if (!match_expr(_rules, &args->elem, _expr, repls, 0)) {
- free_rules_until(_rules, rules);
+ if (!match_expr(rules, &args->elem, _expr, repls, 0)) {
my_free(expr_args);
return -1;
}
@@ -165,7 +163,6 @@ char match_rule(fuspel* rules, rewrite_rule* rule, expression* expr,
_expr = expr_args[++i];
if (!empty_args_list(args) && !_expr) {
- free_rules_until(_rules, rules);
my_free(expr_args);
return -1;
}