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

typo (PR 9908)

Browse Source 
svn: r12438
This commit is contained in:
Matthew Flatt 2008-11-14 02:34:10 +00:00
parent 13b4240cc0
commit dcab9448e8
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
collects/scribblings/guide/simple-syntax.scrbl
View File

@ -280,9 +280,9 @@ work when given non-strings:
@schemeblock[ @schemeblock[
(define (reply s) (define (reply s)
(if (string? s) (if (string? s)
(if (equal? "hello" (substring s 0 5) (if (equal? "hello" (substring s 0 5))
"hi!" "hi!"
"huh?")) "huh?")
"huh?")) "huh?"))
] ]
@ -292,8 +292,8 @@ better written as
@schemeblock[ @schemeblock[
(define (reply s) (define (reply s)
(if (if (string? s) (if (if (string? s)
(equal? "hello" (substring s 0 5) (equal? "hello" (substring s 0 5))
#f)) #f)
"hi!" "hi!"
"huh?")) "huh?"))
] ]