((lambda (x) 1) some-infinite-calculation)

(define (infinite-calculation)
  (infinite-calculation))

((lambda (x) 1) (infinite-calculation))