named functions for bodys, with-a-transaction and dynamic-extent declarations on body-fns

re ADWolf:#1201 and ADWolf:#1205