From dcab9448e8ceca8586696f33849543b6e6ab3996 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 14 Nov 2008 02:34:10 +0000 Subject: [PATCH] typo (PR 9908) svn: r12438 --- collects/scribblings/guide/simple-syntax.scrbl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/collects/scribblings/guide/simple-syntax.scrbl b/collects/scribblings/guide/simple-syntax.scrbl index 425b668790..924880fe0d 100644 --- a/collects/scribblings/guide/simple-syntax.scrbl +++ b/collects/scribblings/guide/simple-syntax.scrbl @@ -280,9 +280,9 @@ work when given non-strings: @schemeblock[ (define (reply s) (if (string? s) - (if (equal? "hello" (substring s 0 5) + (if (equal? "hello" (substring s 0 5)) "hi!" - "huh?")) + "huh?") "huh?")) ] @@ -292,8 +292,8 @@ better written as @schemeblock[ (define (reply s) (if (if (string? s) - (equal? "hello" (substring s 0 5) - #f)) + (equal? "hello" (substring s 0 5)) + #f) "hi!" "huh?")) ]