Browse Source

build-system/guile: Expose #:scheme-file-regexp.

* guix/build-system/guile.scm (%scheme-file-regexp): New variable.
  (guile-build): Accept #:scheme-file-regexp and pass it on to builder.
gn-latest-20200725
Alex Sassmannshausen 1 year ago
parent
commit
70e33ec795
No known key found for this signature in database GPG Key ID: 8BC4F4476E8A8E00
  1. 6
      guix/build-system/guile.scm

6
guix/build-system/guile.scm

@ -29,6 +29,10 @@
#:export (%guile-build-system-modules
guile-build-system))
(define %scheme-file-regexp
;; Regexp to match Scheme files.
"\\.(scm|sls)$")
(define %guile-build-system-modules
;; Build-side modules imported by default.
`((guix build guile-build-system)
@ -80,6 +84,7 @@
(system (%current-system))
(source-directory ".")
not-compiled-file-regexp
(scheme-file-regexp %scheme-file-regexp)
(compile-flags %compile-flags)
(imported-modules %guile-build-system-modules)
(modules '((guix build guile-build-system)
@ -97,6 +102,7 @@
(source
source))
#:source-directory ,source-directory
#:scheme-file-regexp ,scheme-file-regexp
#:not-compiled-file-regexp ,not-compiled-file-regexp
#:compile-flags ,compile-flags
#:phases ,phases

Loading…
Cancel
Save