~ chicken-core (chicken-5) b0fd73b40bb4d6b7ad65d7fa985b7063fa143d70


commit b0fd73b40bb4d6b7ad65d7fa985b7063fa143d70
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Mon Apr 19 19:40:49 2021 +1200
Commit:     Mario Domenech Goulart <mario@parenteses.org>
CommitDate: Sun May 16 17:43:27 2021 +0200

    Fall back to null when gathering components for "chicken-status -c" output
    
    Signed-off-by: Mario Domenech Goulart <mario@parenteses.org>

diff --git a/chicken-status.scm b/chicken-status.scm
index b9dfd759..1b79349f 100644
--- a/chicken-status.scm
+++ b/chicken-status.scm
@@ -143,7 +143,8 @@
       ((c-include) (list (list 'c-include mode (cadr info))))
       ((scheme-include) (list (list 'scheme-include mode (cadr info))))
       ((program) (list (list 'program mode (cadr info))))
-      ((c-object) (list (list 'c-object mode (cadr info))))))
+      ((c-object) (list (list 'c-object mode (cadr info))))
+      (else '())))
 
   (define (list-installed-components eggs)
     (let ((w (quotient (- (get-terminal-width) 2) 2)))
Trap