Lines Matching +refs:cons +refs:stream
3 ;;; A google code search for "cons-stream" might help:
4 ;;; <http://www.google.com/codesearch?q=%22cons-stream%22&hl=en&btnG=Search+Code>
12 ;; Constructor: Special Form `cons-stream'
13 (define-syntax cons-stream
15 ((cons-stream head tail)
16 (cons head (delay tail)))))
20 (define (tail stream) (force (cdr stream)))
22 ;; Conatant: `the-empty-stream'
23 ;; Predicate: `empty-stream?'
25 (define the-empty-stream '())
26 (define empty-stream? null?)
28 ;(define the-empty-stream 'the-empty-stream)
29 ;(define (empty-stream? s) (eq? s the-empty-stream))