Make with-init unwind-protect actually protect

Hey, noticed this which seems like a clear error.  The way it was didn't correctly execute the exit if there is an error in the body.