1 files changed, 4 insertions, 0 deletions
diff --git a/match.c b/match.c
index 3f47ee05..a7a22f4b 100644
--- a/match.c
+++ b/match.c
@@ -1533,6 +1533,8 @@ static val do_match_line(match_line_ctx *c)
 {
   val lfe_save = set_last_form_evaled(nil);
 
+  gc_stack_check();
+
   while (c->specline) {
     val elem = first(c->specline);
 
@@ -4616,6 +4618,8 @@ static val match_files(match_files_ctx c)
 {
   gc_hint(c.data);
 
+  gc_stack_check();
+
   for (; c.spec; c.spec = rest(c.spec),
                  c.data = rest(c.data),
                  c.data_lineno = plus(c.data_lineno, one))