Wrap subs in a NQPRoutine code object when NQPRoutine is in scope.

We need this to fix BEGIN blocks.