suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

update docs and client for #:filter to #:file-filter change

Browse Source 
svn: r3388
This commit is contained in:
Matthew Flatt 2006-06-17 19:23:12 +00:00
parent 688e6bcaa0
commit 3f5f1186a5
2 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
collects/compiler/start.ss
View File

@ -613,11 +613,11 @@
source-files) source-files)
#:replace? (plt-files-replace) #:replace? (plt-files-replace)
#:extra-setup-collections (map list (plt-setup-collections)) #:extra-setup-collections (map list (plt-setup-collections))
#:filter (if (plt-include-compiled) #:file-filter (if (plt-include-compiled)
(lambda (path) (lambda (path)
(or (regexp-match #rx"compiled$" path) (or (regexp-match #rx"compiled$" path)
(std-filter path))) (std-filter path)))
std-filter) std-filter)
#:at-plt-home? (plt-files-plt-home-relative?) #:at-plt-home? (plt-files-plt-home-relative?)
#:test-plt-collects? (not (plt-force-install-dir?))) #:test-plt-collects? (not (plt-force-install-dir?)))
(printf " [output to \"~a\"]~n" (plt-output))] (printf " [output to \"~a\"]~n" (plt-output))]

8
collects/setup/doc.txt
View File

@ -577,7 +577,7 @@ general functions to help make .plt archives:
[#:at-plt-home? at-home?] [#:at-plt-home? at-home?]
[#:test-plt-collects? test?] [#:test-plt-collects? test?]
[#:extra-setup-collections collection-list] [#:extra-setup-collections collection-list]
[#:filter filter-proc]) [#:file-filter filter-proc])
Creates the .plt file specified by the pathname `dest', using the Creates the .plt file specified by the pathname `dest', using the
string `name' as the name reported to Setup PLT as the archive's string `name' as the name reported to Setup PLT as the archive's
@ -603,7 +603,7 @@ general functions to help make .plt archives:
collection paths that are not included in the archive, but are collection paths that are not included in the archive, but are
set-up when the archive is unpacked. set-up when the archive is unpacked.
The optional #:filter argument is the same as for `pack-plt' (see The optional #:file-filter argument is the same as for `pack-plt' (see
below). below).
> (pack-collections dest name collections replace? extra-setup-collections [filter] [at-plt-home?]) > (pack-collections dest name collections replace? extra-setup-collections [filter] [at-plt-home?])
@ -611,7 +611,7 @@ general functions to help make .plt archives:
Old, keywordless variant of `pack-collections-plt' for backward compatibility. Old, keywordless variant of `pack-collections-plt' for backward compatibility.
> (pack-plt dest name paths > (pack-plt dest name paths
[#:filter filter-proc] [#:file-filter filter-proc]
[#:encode? encode?] [#:encode? encode?]
[#:file-mode file-mode-sym] [#:file-mode file-mode-sym]
[#:unpack-unit unit-expr-or-#f] [#:unpack-unit unit-expr-or-#f]
@ -628,7 +628,7 @@ general functions to help make .plt archives:
for directories and files; the contents of these files and for directories and files; the contents of these files and
directories will be packed into the archive. directories will be packed into the archive.
The #:filter procedure is called with the relative path of each The #:file-filter procedure is called with the relative path of each
candidate for packing. If it returns #f for some path, then that candidate for packing. If it returns #f for some path, then that
file or directory is omitted from the archive. If it returns 'file file or directory is omitted from the archive. If it returns 'file
or 'file-replace for a file, the file is packed with that mode, or 'file-replace for a file, the file is packed with that mode,