Barebones cps by desugaring