Index: /trunk/source/lisp-kernel/x86-gc.c
===================================================================
--- /trunk/source/lisp-kernel/x86-gc.c	(revision 8243)
+++ /trunk/source/lisp-kernel/x86-gc.c	(revision 8244)
@@ -25,28 +25,4 @@
 #include <string.h>
 #include <sys/time.h>
-
-#ifndef timeradd
-# define timeradd(a, b, result)						      \
-  do {									      \
-    (result)->tv_sec = (a)->tv_sec + (b)->tv_sec;			      \
-    (result)->tv_usec = (a)->tv_usec + (b)->tv_usec;			      \
-    if ((result)->tv_usec >= 1000000)					      \
-      {									      \
-	++(result)->tv_sec;						      \
-	(result)->tv_usec -= 1000000;					      \
-      }									      \
-  } while (0)
-#endif
-#ifndef timersub
-# define timersub(a, b, result)						      \
-  do {									      \
-    (result)->tv_sec = (a)->tv_sec - (b)->tv_sec;			      \
-    (result)->tv_usec = (a)->tv_usec - (b)->tv_usec;			      \
-    if ((result)->tv_usec < 0) {					      \
-      --(result)->tv_sec;						      \
-      (result)->tv_usec += 1000000;					      \
-    }									      \
-  } while (0)
-#endif
 
 
@@ -349,8 +325,8 @@
           ((hash_table_vector_header *) base)->cache_key = undefined;
           ((hash_table_vector_header *) base)->cache_value = lisp_nil;
-        }
-        deref(ptr_to_lispobj(base),1) = GCweakvll;
-        GCweakvll = n;
-        return;
+          deref(ptr_to_lispobj(base),1) = GCweakvll;
+          GCweakvll = n;
+          return;
+        }
       }
 
@@ -518,8 +494,8 @@
           ((hash_table_vector_header *) base)->cache_key = undefined;
           ((hash_table_vector_header *) base)->cache_value = lisp_nil;
-        }
-        deref(ptr_to_lispobj(base),1) = GCweakvll;
-        GCweakvll = n;
-        return;
+          deref(ptr_to_lispobj(base),1) = GCweakvll;
+          GCweakvll = n;
+          return;
+        }
       }
 
@@ -758,9 +734,8 @@
         ((hash_table_vector_header *) base)->cache_key = undefined;
         ((hash_table_vector_header *) base)->cache_value = lisp_nil;
-      }
-
-      deref(ptr_to_lispobj(base),1) = GCweakvll;
-      GCweakvll = this;
-      goto Climb;
+        deref(ptr_to_lispobj(base),1) = GCweakvll;
+        GCweakvll = this;
+        goto Climb;
+      }
     }
 
