summaryrefslogtreecommitdiffstats
path: root/match.c
diff options
context:
space:
mode:
Diffstat (limited to 'match.c')
-rw-r--r--match.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/match.c b/match.c
index 5ce37849..10fd1770 100644
--- a/match.c
+++ b/match.c
@@ -4308,11 +4308,15 @@ static val v_load(match_files_ctx *c)
}
}
} else {
+ uw_set_match_context(cons(c->spec, c->bindings));
+
if (!read_eval_stream(stream, std_error)){
close_stream(stream, nil);
sem_error(specline, lit("load: ~a contains errors"), path, nao);
}
+ c->bindings = cdr(uw_get_match_context());
+
ret = (sym == include_s) ? nil : next_spec_k;
}