~ chicken-core (chicken-5) 6be2abba1e16575514081ccd5fd3d2176fb16cf3


commit 6be2abba1e16575514081ccd5fd3d2176fb16cf3
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Mon Apr 19 19:40:48 2021 +1200
Commit:     Mario Domenech Goulart <mario@parenteses.org>
CommitDate: Sun May 16 17:39:08 2021 +0200

    Include `c-object' components in "chicken-status -c" output
    
    Signed-off-by: Mario Domenech Goulart <mario@parenteses.org>

diff --git a/chicken-status.scm b/chicken-status.scm
index 7e3e73f7..b9dfd759 100644
--- a/chicken-status.scm
+++ b/chicken-status.scm
@@ -142,7 +142,8 @@
       ((generated-source-file) (list (list 'generated-source-file mode (cadr info))))
       ((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))))))
+      ((program) (list (list 'program mode (cadr info))))
+      ((c-object) (list (list 'c-object mode (cadr info))))))
 
   (define (list-installed-components eggs)
     (let ((w (quotient (- (get-terminal-width) 2) 2)))
Trap