Replacing PROTECT(a = foo()) by VAPROTECT(a, foo()) to have explicitly names of locals.