Back to slide -- Keyboard shortcut: 'u'                      stream.scm - An implementation of cons-stream in R5RS Scheme.Lecture 4 - slide 23 : 27
Program 1

(define-syntax cons-stream
  (syntax-rules ()
    ((cons-stream x y)
     (cons x (delay y)))))