Index: show-uncalled-procedures.scm
==================================================================
--- show-uncalled-procedures.scm
+++ show-uncalled-procedures.scm
@@ -150,8 +150,8 @@
                      (for-each (lambda (x)
                                  (lookup uppath x updepth) )
                                upcone)))))
     (lookup "." procname 0)))
 
+(show-danglers)
 
-;(traceback-proc "run:run-tests")