~ chicken-core (chicken-5) 9bdb09c17f2d888de355f68d92f4dc9ef4086c69


commit 9bdb09c17f2d888de355f68d92f4dc9ef4086c69
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Jun 9 10:14:22 2018 +0200
Commit:     Peter Bex <peter@more-magic.net>
CommitDate: Sat Jun 9 19:28:33 2018 +0200

    Pass the source-file-dependencies to the component p-list for generated source files
    
    Without this the source-dependencies list in the build-script generation would always
    default to #f and trigger an error.
    
    Signed-off-by: Peter Bex <peter@more-magic.net>

diff --git a/egg-compile.scm b/egg-compile.scm
index 1ed240ca..f5996a68 100644
--- a/egg-compile.scm
+++ b/egg-compile.scm
@@ -216,12 +216,14 @@
           (fluid-let ((target (check-target (cadr info) data))
                       (src #f)
                       (cbuild #f)
+                      (sdeps '())
                       (cdeps '()))
             (for-each compile-extension/program (cddr info))
             (unless cbuild
               (error "generated source files need a custom build step" target))
             (set! genfiles
-              (cons (list target dependencies: cdeps source: src custom: cbuild)
+              (cons (list target dependencies: cdeps source: src 
+                          custom: cbuild source-dependencies: sdeps)
                     genfiles))))
         ((c-include)
           (fluid-let ((target (check-target (cadr info) cinc))
@@ -609,8 +611,8 @@
            (if custom (quotearg cmd) "") " "
            (filelist srcdir source-dependencies))))
 
-(define ((compile-generated-file name #!key source 
-                                 custom source-dependencies) 
+(define ((compile-generated-file name #!key source custom
+                                 source-dependencies) 
          srcdir platform)
   (let* ((cmd (prefix srcdir custom))
          (sname (prefix srcdir name))
Trap