Provide promise?.

[NoahStoryM]

With promise?, we can define more precise predicates for some data structures:

(define (stream? v)
  (or (null? v)
      (and (pair? v)
           (promise? (cdr v)))))