Index: tests/multi_list.cfa
===================================================================
--- tests/multi_list.cfa	(revision 53449a48dee3324f96932ed8c4befe2756837314)
+++ tests/multi_list.cfa	(revision c8025a2106ce52966312a91c95b8d09da7b91b8b)
@@ -19,4 +19,16 @@
 }
 
+TaskDL *& Back( TaskDL * n ) {
+	return (TaskDL *)Back( (Seqable *)n );
+}
+
+TaskDL *& Next( TaskDL * n ) {
+	return (TaskDL *)Next( (Colable *)n );
+}
+
+bool listed( TaskDL * n ) {
+	return Next( (Colable *)n ) != 0p;
+}
+
 struct TaskSL {
 	inline Colable;
@@ -29,4 +41,12 @@
 Task & task( TaskSL & this ) with( this ) {				// getter routine for containing node
 	return node;
+}
+
+TaskSL *& Next( TaskSL * n ) {
+	return (TaskSL *)Next( (Colable *)n );
+}
+
+bool listed( TaskSL * n ) {
+	return Next( (Colable *)n ) != 0p;
 }