Edit History


Edit history of sicp-ex-2.23

RevTimeChangesOperations
Log
142014-05-22 17:35:53+9 -0 line(s)[View this version, source] [Diff to previous]
add a comment that (begin) can make block structure
132014-04-17 11:57:33+10 -0 line(s)[View this version, source] [Diff to current|previous]
Add solution.
122013-10-24 07:43:39+6 -5 line(s)[View this version, source] [Diff to current|previous]
<<<coriolis {{{scheme (define (for-each unary-proc seq) (if (null? seq) (newline) (unary-proc (car seq)) (for-each unary-proc (cdr seq)) ) ) }}} >>>
112013-10-24 07:38:34+12 -0 line(s)[View this version, source] [Diff to current|previous]
<<<coriolis {{{scheme (define for-each (lambda (unary-proc seq) (if (null? seq) (newline) (unary-proc (car seq)) (for-each unary-proc (cdr seq)) ) ) ) }}} >>>
102013-07-20 17:26:22+24 -3 line(s)[View this version, source] [Diff to current|previous]
Added another solution using if instead of cond.
92012-10-21 20:07:22+17 -0 line(s)[View this version, source] [Diff to current|previous]
>>>> ----- <<<<wbooze {{{scheme ;;; i did the same with common-lisp ;;; it pretty much matches the first scheme form on this page tho! (defun for-each (proc items) (if (null items) nil (apply proc (car items) nil)) (if (not (null (cdr items)))
82012-02-01 03:27:08+8 -0 line(s)[View this version, source] [Diff to current|previous]
Adding comment about amsad's answer being incorrect
72011-08-01 23:11:46+13 -0 line(s)[View this version, source] [Diff to current|previous]
Added alternative solution, Amjad Masad.
62011-03-13 16:52:01+25 -0 line(s)[View this version, source] [Diff to current|previous]
My solution in common lisp. Tang Yaguang
52011-01-15 17:47:14+0 -18 line(s)[View this version, source] [Diff to current|previous]
deleted duplicate answer.
42011-01-15 17:46:50+19 -0 line(s)[View this version, source] [Diff to current|previous]
added a new solution that works for the null list.
32011-01-15 17:46:08+18 -0 line(s)[View this version, source] [Diff to current|previous]
added a new solution that works for the null list.
22010-02-08 16:31:21+14 -0 line(s)[View this version, source] [Diff to current|previous]
ADD: nav ADD: solution / holub
12007-12-25 20:58:09+33 -0 line(s)[View this version, source] [Diff to current|previous]
initial draft
[Diff from epoch]