home: hub: zuo

Download patch

ref: 40487c8b346b42e5f49dff63ec3652d00abcbf40
parent: 205e4194e533d0e8687b81ea2d2a2b1f25c7aa35
author: Matthew Flatt <mflatt@racket-lang.org>
date: Thu Aug 31 03:48:03 CDT 2023

Zuo: improve `provide-targets`

Instead of passing `build-path` to `build/command-line*` in the
expansion of `provide-targets`, leave it to the default
`(make-at-dir ".")`. Since the result of `make-at-dir` behaves
the same as `build-path` for a non-zero number of arguments, this
should be a backward-compatible change.

Closes #4732

--- a/lib/zuo/build.zuo
+++ b/lib/zuo/build.zuo
@@ -682,10 +682,9 @@
                                    [,targets-at-id targets-at]))
         `(,(quote-syntax module+)
           main
+          ;; builds to current directory by default:
           (,(quote-syntax build/command-line*)
-           ,targets-at-id
-           ;; builds to current directory by default:
-           build-path))))
+           ,targets-at-id))))
 
 (define-syntax (bounce-to-targets stx)
   (unless (and (list? stx) (= 4 (length stx)))
--- a/zuo-doc/zuo-build.scrbl
+++ b/zuo-doc/zuo-build.scrbl
@@ -572,9 +572,14 @@
 
 Provides @racket[targets-at-id] as @racketidfont{targets-at}, and
 creates a @racketidfont{main} submodule that runs
-@racket[(build/command-line* targets-at-id build-path)]. A script
+@racket[(build/command-line* targets-at-id)]. A script
 using @racket[provide-targets] thus works as a makefile-like script or
-as an input to a larger build.}
+as an input to a larger build.
+
+@history[#:changed "1.7" @elem{Removed @racket[build-path] as a second
+                               argument to @racket[build/command-line*] so that
+                               the default @racket[(make-at-dir ".")]
+                               is used, instead.}]}
 
 @defform[(bounce-to-targets config-file-expr key-symbol-expr script-file-expr)]{
 
--- a/zuo.c
+++ b/zuo.c
@@ -3,7 +3,7 @@
    declarations. */
 
 #define ZUO_VERSION 1
-#define ZUO_MINOR_VERSION 6
+#define ZUO_MINOR_VERSION 7
 
 #if defined(_MSC_VER) || defined(__MINGW32__)
 # define ZUO_WINDOWS