Bug with futures and debugging and profiling

What version of Racket are you using?
9.3 [cs] inside DrRacket

I also get an error in 9.2

What program did you run?

#lang racket ;in DrRacket with debugging & profiling

(define f-one
  (future
   (lambda ()
     (let-values ([(end) (expt 2 10000)])
       (cons 1 null)))))

(define f-two
  (future (lambda () 2)))

(touch f-one)

What should have happened?

Show (1). (Or perhaps an out of memory error???).

If you got an error message, please include it here.

-: contract violation
  expected: number?
  given: #<void>

Please include any other relevant details

To get the error I must run it in DrRacket with debugging and profiling. It raises the error like 99% of the time. Most of the code can be eliminated, but it only raises the error like half of the time. My guess the problem is in blocking and unblocking.

This is a minimized version of the example posted by @joskoot in https://racket.discourse.group/t/futures-not-running-parallely/4366

Start with the minimized Racket program in the issue and reproduce it in DrRacket with debugging and profiling enabled. Investigate the futures blocking and unblocking behavior around touch, then verify that the program reliably produces (1) without the number? contract violation; the report notes no specific files or tests.