乐正

Actions speak louder than words.

Sicp-ex3-51

问题

为了更仔细地观察延时求值的情况,我们将使用下面的过程,它在打印其参数之后简单地返回它:

1
2
3
(define (show x)
  (display-line x)
  x)

解释器对于顺序的求值下面各个表达式的响应是什么?

1
2
3
4
5
(define x (stream-map show (stream-enumerate-interval 0 10)))

(stream-ref x 5)

(stream-ref x 7)

解答

答案如下:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
(stream-ref x 5)

1
2
3
4
5
;Value: 5

(stream-ref x 7)

6
7
;Value: 7

draft

« sicp-ex3-50 sicp-ex3-52 »

Comments