~ chicken-core (chicken-5) c7148d0bcb39845075aa9f6a67e7a2f53742a93a
commit c7148d0bcb39845075aa9f6a67e7a2f53742a93a Author: Evan Hanson <evhan@foldling.org> AuthorDate: Sun Apr 23 17:05:57 2017 +1200 Commit: Evan Hanson <evhan@foldling.org> CommitDate: Sun Apr 23 17:05:59 2017 +1200 Add `generated-source-file` to "chicken-status -c" output diff --git a/chicken-status.scm b/chicken-status.scm index 1846a371..dee8150e 100644 --- a/chicken-status.scm +++ b/chicken-status.scm @@ -128,15 +128,12 @@ (define (gather-components-rec info mode) (case (car info) ((host) - (if host-extensions - (gather-components (cdr info) 'host) - '())) + (if host-extensions (gather-components (cdr info) 'host) '())) ((target) - (if target-extensions - (gather-components (cdr info) 'target) - '())) + (if target-extensions (gather-components (cdr info) 'target) '())) ((extension) (list (list 'extension mode (cadr info)))) ((data) (list (list 'data mode (cadr info)))) + ((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))))))Trap