16 target <- parse_env_subset(x[2], substitute = TRUE)  globalVar
20 target <- parse_env_subset(x[[2]], substitute = TRUE)  globalVar
24 target <- parse_env_subset(x[1, 2], substitute = TRUE)  globalVar
28 target <- parse_env_subset(x[[1, 2]], substitute = TRUE)  globalVar
33 target <- parse_env_subset(x[1, 2], substitute = TRUE)  globalVar
37 target <- parse_env_subset(x[[1, 2]], substitute = TRUE)  globalVar
41 target <- parse_env_subset(x[1, 4], substitute = TRUE)  globalVar
45 target <- parse_env_subset(x[[1, 4]], substitute = TRUE)  globalVar
49 target <- parse_env_subset(x[1, 1:2], substitute = TRUE)  globalVar
55 target <- parse_env_subset(x[1, -3], substitute = TRUE)  globalVar
62 target <- parse_env_subset(x[[1, 4]], substitute = TRUE)  globalVar
73 target <- parse_env_subset(x[["a", 2]], substitute = TRUE)  globalVar
77 target <- parse_env_subset(x[["a", "B"]], substitute = TRUE)  globalVar
81 target <- parse_env_subset(x["a", "B"], substitute = TRUE)  globalVar
85 target <- parse_env_subset(x["a", 1:3], substitute = TRUE)  globalVar
91 target <- parse_env_subset(x["a", ], substitute = TRUE)  globalVar
97 target <- parse_env_subset(x["a", -1], substitute = TRUE)  globalVar
114 res <- try(target <- parse_env_subset(x[[1, 2]], substitute = TRUE),  globalVar
127 res <- try(target <- parse_env_subset(x[[0]], substitute = TRUE), silent = TRUE)  globalVar
130 res <- try(target <- parse_env_subset(x[[1, 0]], substitute = TRUE),  globalVar
134 res <- try(target <- parse_env_subset(x[[1, 2, 3]], substitute = TRUE),  globalVar