sub-in -> multi-in
This commit is contained in:
parent
c0811dc220
commit
c3da0babb7
|
@ -97,8 +97,8 @@
|
|||
stx ps)))))))])
|
||||
(syntax/loc stx (combine-in paths ...))))]))
|
||||
|
||||
(provide sub-in)
|
||||
(define-require-syntax (sub-in stx)
|
||||
(provide multi-in)
|
||||
(define-require-syntax (multi-in stx)
|
||||
(syntax-case stx ()
|
||||
[(_ dir files ...)
|
||||
(or (andmap (lambda (f) ; directory + all files
|
||||
|
|
|
@ -1161,18 +1161,18 @@ but then sub-directories that are called
|
|||
@filepath{utils} override the one in the project's root.
|
||||
In other words, the previous method requires only a single unique name.}
|
||||
|
||||
@defform[(sub-in parent child ...)
|
||||
@defform[(multi-in parent child ...)
|
||||
#:contracts ([parent module-path?] [child module-path?])]{
|
||||
Specifies multiple files to be required from directory
|
||||
@racket[parent] relative to the current directory, or from
|
||||
subcollects @racket[child] in collect @racket[parent].
|
||||
|
||||
For example:
|
||||
@racketblock[(require (sub-in racket list dict))]
|
||||
@racketblock[(require (multi-in racket list dict))]
|
||||
is equivalent to:
|
||||
@racketblock[(require racket/list racket/dict)]
|
||||
Similarly:
|
||||
@racketblock[(require (sub-in "utils" "math.rkt" "matrix.rkt"))]
|
||||
@racketblock[(require (multi-in "utils" "math.rkt" "matrix.rkt"))]
|
||||
is equivalent to:
|
||||
@racketblock[(require "utils/math.rkt" "utils/matrix.rkt")]
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue
Block a user