diff -ruN klic-3.003-2002-02-20d/include/klic/index.h klic-3.003-2002-02-20e/include/klic/index.h
--- klic-3.003-2002-02-20d/include/klic/index.h	Thu Dec 27 19:15:58 2001
+++ klic-3.003-2002-02-20e/include/klic/index.h	Wed Feb 20 14:48:08 2002
@@ -30,17 +30,6 @@
   } \
 }while(0)
 
-#define deref_and_test(x, susp) \
-do{ \
-  q temp0 = derefone(x); \
-  if(!isref(temp0) || (x) != derefone(temp0)) { \
-    (x) = temp0; \
-  } else { \
-    *reasonp++ = (x); \
-    goto susp; \
-  } \
-}while(0)
-
 #define deref_and_jump(x, loop) \
 do{ \
   q temp0 = derefone(x); \
@@ -49,9 +38,5 @@
     goto loop; \
   } \
 }while(0)
-
-#define not_cons(x)		((tag = ptagof(x)) != CONS)
-#define not_functor()		(tag <= CONS)
-#define not_atomic()		(tag == 0)
 
 #endif /* _KLIC_INDEX_H_ */