~ 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