How to realise DCont with shift/reset via F#?

I found F# Continuation Example · GitHub

But that is not delimited continuations.

Yet, I dont undestand why run take arg Cont<'a, 'a> if in type it ‘a → ‘r?