%%%% Starting test lists
Group begin: lists
Test begin:
  test-name: "cons is lazy, car"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "cons is lazy, cdr"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
Test end:
  result-kind: pass
  actual-value: 1000
  expected-value: 1000
Test begin:
  test-name: "map is lazy"
Test end:
  result-kind: pass
  actual-value: (1000)
  expected-value: (1000)
Test begin:
  test-name: "runs in bounded space"
Test end:
  result-kind: pass
  actual-value: 1000000
  expected-value: 1000000
Group end: lists
# of expected passes      5