Finish converting scheme' -> racket'.

Everything compiles fine now even if the compatibility bindings are
gone.

original commit: a38f384a00
This commit is contained in:
Eli Barzilay 2011-06-27 22:24:08 -04:00
parent 333c1506a9
commit 15cd89c4af
4 changed files with 14 additions and 15 deletions

View File

@ -25,15 +25,15 @@
(list (to-flow spacer)
(to-flow sec)
(to-flow spacer)
(to-flow (scheme sym0))
(to-flow (racket sym0))
(to-flow spacer)
(to-flow (scheme flag0)))
(to-flow (racket flag0)))
(list (to-flow spacer)
(to-flow spacer)
(to-flow spacer)
(to-flow (scheme sym))
(to-flow (racket sym))
(to-flow spacer)
(to-flow (scheme flag)))
(to-flow (racket flag)))
...))
...))))
@ -317,7 +317,7 @@ Pending expunges must be handled before calling this function; see
)]{
An IMAP flag is a symbol, but it is generally not a convenient one to
use within a Scheme program, because it usually starts with a
use within a Racket program, because it usually starts with a
backslash. The @racket[imap-flag->symbol] and
@racket[symbol->imap-flag] procedures convert IMAP flags to convenient
symbols and vice-versa:

View File

@ -10,14 +10,14 @@
#f
(append
(list
(list (to-flow (scheme 'type))
(list (to-flow (racket 'type))
(to-flow spacer)
(to-flow (scheme 'sub-type0))
(to-flow (racket 'sub-type0))
(to-flow spacer)
(to-flow ref0))
(list (to-flow spacer)
(to-flow spacer)
(to-flow (scheme 'sub-type))
(to-flow (racket 'sub-type))
(to-flow spacer)
(to-flow ref))
...)

View File

@ -153,21 +153,21 @@ Raised when the server produces a malformed response.}
@racketblock[
#,pt (require net/pop3)
#,pt (define c (connect-to-server "cs.rice.edu"))
#,pt (authenticate/plain-text "scheme" "********" c)
#,pt (define c (connect-to-server "foo.bar.com"))
#,pt (authenticate/plain-text "bob" "********" c)
#,pt (get-mailbox-status c)
196
816400
#,pt (get-message/headers c 100)
("Date: Thu, 6 Nov 1997 12:34:18 -0600 (CST)"
"Message-Id: <199711061834.MAA11961@new-world.cs.rice.edu>"
"From: Shriram Krishnamurthi <shriram@cs.rice.edu>"
"Message-Id: <199711061834.MAA11961@foo.bar.com>"
"From: Alice <alice@foo.bar.com>"
....
"Status: RO")
#,pt (get-message/complete c 100)
("Date: Thu, 6 Nov 1997 12:34:18 -0600 (CST)"
"Message-Id: <199711061834.MAA11961@new-world.cs.rice.edu>"
"From: Shriram Krishnamurthi <shriram@cs.rice.edu>"
"Message-Id: <199711061834.MAA11961@foo.bar.com>"
"From: Alice <alice@foo.bar.com>"
....
"Status: RO")
("some body" "text" "goes" "." "here" "." "")

View File

@ -395,4 +395,3 @@ except @racket[current-https-protocol]. Note that the exports of
@defsignature[url+scheme^ (url^)]{
Adds @racket[current-connect-scheme] to @racket[url^].}