(begin (set! x (cons 'ctc x)) any/c) should be evaluated whenever `f' is called. If there isn't an arg list (), it would only be evaluated 1 time. https://github.com/racket/racket/issues/2711
eb20dc44