~ 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