(Fset_match_data): Fix last change.

1 files changed, 2 insertions, 0 deletions

diff --git a/src/search.c b/src/search.c
index 2a75c96e117..c1f2fd77cec 100644
--- a/src/search.c
+++ b/src/search.c
@@ -2942,6 +2942,7 @@ Note: No other references to the markers must exist if you use this.  */)
                   free_marker (m);
                 else
                   unchain_marker (XMARKER (m));
+                XSETCAR (list, Qnil);
               }
 
             if ((list = XCDR (list), !CONSP (list)))
@@ -2962,6 +2963,7 @@ Note: No other references to the markers must exist if you use this.  */)
                   free_marker (m);
                 else
                   unchain_marker (XMARKER (m));
+                XSETCAR (list, Qnil);
               }
           }
         list = XCDR (list);