Index: tests/multi_list.cfa
===================================================================
--- tests/multi_list.cfa	(revision 28e88d7949deacb0f206e9b812a6b8adce7f9916)
+++ tests/multi_list.cfa	(revision 19de7864a47b37585af2cc6f6108a0337c2a37c1)
@@ -27,8 +27,4 @@
 }
 
-bool listed( TaskDL * n ) {
-	return Next( (Colable *)n ) != 0p;
-}
-
 struct TaskSL {
 	inline Colable;
@@ -45,8 +41,4 @@
 TaskSL *& Next( TaskSL * n ) {
 	return (TaskSL *)Next( (Colable *)n );
-}
-
-bool listed( TaskSL * n ) {
-	return Next( (Colable *)n ) != 0p;
 }
 
Index: tests/queue.cfa
===================================================================
--- tests/queue.cfa	(revision 28e88d7949deacb0f206e9b812a6b8adce7f9916)
+++ tests/queue.cfa	(revision 19de7864a47b37585af2cc6f6108a0337c2a37c1)
@@ -16,8 +16,4 @@
 	Fred *& Next( Fred * n ) {
 		return (Fred *)Next( (Colable *)n );
-	}
-
-	bool listed( Fred * n ) {
-		return Next( (Colable *)n ) != 0p;
 	}
 
@@ -76,9 +72,5 @@
 
 	Mary *& Next( Mary * n ) {
-		return (Mary *)Next( (Colable *)n );
-	}
-
-	bool listed( Mary * n ) {
-		return Next( (Colable *)n ) != 0p;
+		return (Mary *)Next( (Fred *)n );
 	}
 
Index: tests/sequence.cfa
===================================================================
--- tests/sequence.cfa	(revision 28e88d7949deacb0f206e9b812a6b8adce7f9916)
+++ tests/sequence.cfa	(revision 19de7864a47b37585af2cc6f6108a0337c2a37c1)
@@ -21,8 +21,4 @@
 	Fred *& Next( Fred * n ) {
 		return (Fred *)Next( (Colable *)n );
-	}
-
-	bool listed( Fred * n ) {
-		return Next( (Colable *)n ) != 0p;
 	}
 
@@ -89,13 +85,9 @@
 
 	Mary *& Back( Mary * n ) {
-		return (Mary *)Back( (Seqable *)n );
+		return (Mary *)Back( (Fred *)n );
 	}
 
 	Mary *& Next( Mary * n ) {
-		return (Mary *)Next( (Colable *)n );
-	}
-
-	bool listed( Mary * n ) {
-		return Next( (Colable *)n ) != 0p;
+		return (Mary *)Next( (Fred *)n );
 	}
 
Index: tests/stack.cfa
===================================================================
--- tests/stack.cfa	(revision 28e88d7949deacb0f206e9b812a6b8adce7f9916)
+++ tests/stack.cfa	(revision 19de7864a47b37585af2cc6f6108a0337c2a37c1)
@@ -16,8 +16,4 @@
 	Fred *& Next( Fred * n ) {
 		return (Fred *)Next( (Colable *)n );
-	}
-
-	bool listed( Fred * n ) {
-		return Next( (Colable *)n ) != 0p;
 	}
 
@@ -76,9 +72,5 @@
 
 	Mary *& Next( Mary * n ) {
-		return (Mary *)Next( (Colable *)n );
-	}
-
-	bool listed( Mary * n ) {
-		return Next( (Colable *)n ) != 0p;
+		return (Mary *)Next( (Fred *)n );
 	}