(list-expand): Flag wip better.

diff --git a/cgen/utils.scm b/cgen/utils.scm
index f31a698..b11e07e 100644 (file)
--- a/cgen/utils.scm
+++ b/cgen/utils.scm
@@ -1291,7 +1291,7 @@
 ;      (a b 4 c d 6))
 
 (define (list-expand l)
-  #f ; ??? wip
+  (error "wip")
 )
 
 ; If OBJ has a dump method call it, otherwise return OBJ untouched.