Too bad CPS is SLOW AS FUCK

(fact values 100000), ten times (cps)
cpu time: 431239 real time: 431781 gc time: 132998
(fact 100000), ten times (tail recursive)
cpu time: 7 real time: 6 gc time: 0

cps vs tail-recursive doesn't make sense. If you didn't end up with all tail calls then you did cps wrong.