Code Review

Compare your solutions

    (define (runtime)
  (current-milliseconds))

(define (search-for-primes number-from prime-count op)
  (if (> prime-count 0)
      (if (timed-prime-test number-from op)
          (search-for-primes (+ number-from 1) (- prime-count 1) op)
          (search-for-primes (+ number-from 1) prime-count op))0))