scratch/lexspaces 00108a5 15/17: Fix sweep_symbols

[Andrea Corallo]

branch: scratch/lexspaces
commit 00108a5afd50cd7424742ff04ade103defa97754
Author: Andrea Corallo <address@hidden>
Commit: Andrea Corallo <address@hidden>

    Fix sweep_symbols
---
 src/alloc.c | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/alloc.c b/src/alloc.c
index 1ab96a7..07e4dd2 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -7004,10 +7004,8 @@ sweep_symbols (void)
                 }
               sym->u.s.next = symbol_free_list;
               symbol_free_list = sym;
-             /* FIXME */
-             if (!NILP (sym->u.s._function))
-               XBINDING (symbol_free_list->u.s._function)->b[CURRENT_LEXSPACE]
-                 = dead_object ();
+             /* There is one and only binding per symbol!  */
+             symbol_free_list->u.s._function = dead_object ();
               ++this_free;
             }
           else