(sweep_weak_table): Advance prev pointer when we keep a pair.

1 files changed, 4 insertions, 0 deletions

diff --git a/src/fns.c b/src/fns.c
index 3f92a0e0bfb..9a3121a3391 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -4836,6 +4836,10 @@ sweep_weak_table (h, remove_entries_p)
 
                   h->count = make_number (XFASTINT (h->count) - 1);
                 }
+              else
+                {
+                  prev = idx;
+                }
             }
           else
             {