{base::is.integer(identity)} is not TRUE (FALSE)

[1] "{base::is.integer(identity)} is not TRUE (FALSE)"

delayedAssign("x", stop("error 1"), assign.env = env1)

delayedAssign("x", stop("error 2"), assign.env = env2)

env0 <- list2env(list(x = TRUE), new.env())