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

adjust syntax/loc and some docs

Browse Source 
svn: r13899
This commit is contained in:
Matthew Flatt 2009-03-02 22:24:25 +00:00
parent d7c9b2b771
commit ff0b532864
3 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/scheme/private/stxloc.ss
View File

@ -21,7 +21,8 @@
(syntax (syntax-case** _ #f stxe kl free-identifier=? clause ...))]))) (syntax (syntax-case** _ #f stxe kl free-identifier=? clause ...))])))
(-define (relocate loc stx) (-define (relocate loc stx)
(if (syntax-source loc) (if (or (syntax-source loc)
(syntax-position loc))
(datum->syntax stx (datum->syntax stx
(syntax-e stx) (syntax-e stx)
loc loc

2
collects/scribblings/reference/filesystem.scrbl
View File

@ -423,7 +423,7 @@ absolute path; it is an absolute path when adding the
platform-specific shared-library extension --- as produced by platform-specific shared-library extension --- as produced by
@scheme[(system-type 'so-suffix)] --- and then searching in the @scheme[(system-type 'so-suffix)] --- and then searching in the
PLT-specific shared-object library directories (as determined by PLT-specific shared-object library directories (as determined by
@scheme[find-dll-dirs]) locates the path. In this way, shared-object @scheme[get-lib-search-dirs]) locates the path. In this way, shared-object
libraries that are installed specifically for PLT Scheme get carried libraries that are installed specifically for PLT Scheme get carried
along in distributions. along in distributions.

3
collects/scribblings/reference/stx-patterns.scrbl
View File

@ -348,7 +348,8 @@ for use only with a @scheme[quasisyntax] template.}
Like @scheme[syntax], except that the immediate resulting syntax Like @scheme[syntax], except that the immediate resulting syntax
object takes its source-location information from the result of object takes its source-location information from the result of
@scheme[stx-expr] (which must produce a syntax object), unless the @scheme[stx-expr] (which must produce a syntax object), unless the
@scheme[template] is just a pattern variable.} @scheme[template] is just a pattern variable or both the source and
position of @scheme[stx-expr] are @scheme[#f].}
@defform[(quasisyntax/loc stx-expr template)]{ @defform[(quasisyntax/loc stx-expr template)]{