fix mismatch between five.rkt code and Guide prose
Merge to 5.0.1
(cherry picked from commit 787bd61e33
)
This commit is contained in:
parent
a8785decf6
commit
ff9f80b28e
|
@ -2,5 +2,5 @@
|
||||||
|
|
||||||
(provide read read-syntax)
|
(provide read read-syntax)
|
||||||
|
|
||||||
(define (read in) (read-string 5 in))
|
(define (read in) (list (read-string 5 in)))
|
||||||
(define (read-syntax src in) (read-string 5 in))
|
(define (read-syntax src in) (list (read-string 5 in)))
|
||||||
|
|
|
@ -27,15 +27,7 @@ parsed as determined by the @racketidfont{read} and
|
||||||
|
|
||||||
For example, suppose that file @filepath{five.rkt} contains
|
For example, suppose that file @filepath{five.rkt} contains
|
||||||
|
|
||||||
@racketmod[
|
@racketmodfile["five.rkt"]
|
||||||
#:file "five.rkt"
|
|
||||||
racket/base
|
|
||||||
|
|
||||||
(provide read read-syntax)
|
|
||||||
|
|
||||||
(define (read in) (list (read-string 5 in)))
|
|
||||||
(define (read-syntax src in) (list (read-string 5 in)))
|
|
||||||
]
|
|
||||||
|
|
||||||
Then, the program
|
Then, the program
|
||||||
|
|
||||||
|
@ -84,7 +76,7 @@ space.
|
||||||
A @racketmetafont{#reader} form can be used in the @tech{REPL}, too:
|
A @racketmetafont{#reader} form can be used in the @tech{REPL}, too:
|
||||||
|
|
||||||
@interaction[
|
@interaction[
|
||||||
(eval:alts @#,(elem @racketmetafont{#reader}@racket["five.rkt"]@tt{abcde}) #reader"five.rkt"abcde)
|
(eval:alts '@#,(elem @racketmetafont{#reader}@racket["five.rkt"]@tt{abcde}) '#reader"five.rkt"abcde)
|
||||||
]
|
]
|
||||||
|
|
||||||
@; ----------------------------------------------------------------------
|
@; ----------------------------------------------------------------------
|
||||||
|
|
Loading…
Reference in New Issue
Block a user