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

remove misplaced #:evals in schemeblocks

Browse Source 
svn: r10877
This commit is contained in:
Matthew Flatt 2008-07-23 15:01:13 +00:00
parent 44e5ba4ec2
commit a0f7301dff
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/scribblings/guide/lists.scrbl
View File

@ -219,7 +219,6 @@ local function @scheme[iter] that accumulates the length in an
argument @scheme[len]: argument @scheme[len]:
@schemeblock[ @schemeblock[
#:eval list-eval
(define (my-length lst) (define (my-length lst)
(code:comment #, @t{local function @scheme[iter]:}) (code:comment #, @t{local function @scheme[iter]:})
(define (iter lst len) (define (iter lst len)
@ -262,7 +261,6 @@ accumulating the result list. The only catch is that the accumulated
list will be backwards, so you'll have to reverse it at the very end: list will be backwards, so you'll have to reverse it at the very end:
@schemeblock[ @schemeblock[
#:eval list-eval
(define (my-map f lst) (define (my-map f lst)
(define (iter lst backward-result) (define (iter lst backward-result)
(cond (cond