- unique name of uninterned gensyms is removed, allowing them to

get new unique names if needed (instead of having multiple gensyms
  with the same name some of which are not eq?).

scheme/last-revision

@@ -1 +1 @@
-1671
+1672

src/ikarus-symbol-table.c

@@ -173,6 +173,7 @@ ikrt_unintern_gensym(ikptr sym, ikpcb* pcb){
   while(bckt){
     if (ref(bckt, off_car) == sym) {
       /* found it */
+      ref(sym, off_symbol_record_ustring) = true_object;
       ref(loc, 0) = ref(bckt, off_cdr);
       return true_object;
     } else {