[Bug]: Iterator of the for loop is treated as an object in get_code_dependency

[m7pr]

If object is treated as an iterator in a for loop, like x below, then get_code treats this case as this object created in this for loop, hence even though it's a temporary object (just for the time of the for loop execution) it gets extracted in the get_code

library(teal.code)
q <- within(qenv(), {
  a <- 1
  b <- 2
}) |> within({
  for (x in c(1, 2)) {
    b <- a
    b <- b + a + 1
    b + 3 -> b
  }
}) |> within({
  x <- 5
})

get_code(q, names = 'x') |> cat()
#> a <- 1
#> b <- 2
#> for (x in c(1, 2)) {
#>     b <- a
#>     b <- b + a + 1
#>     b <- b + 3
#> }
#> x <- 5

^{Created on 2024-11-27 with reprex v2.1.1}

[llrs-roche]

Perhaps it is more illustrative the following example, where x is "exported" even if it is not defined inside the loop:

library(teal.code)
q <- within(qenv(), {
  a <- 1
  b <- 2
}) |> within({
  for (x in c(1, 2)) {
    b <- a
    b <- b + a + 1
    b + 3 -> b
  }
})

q
#> <environment: 0x000002a89a708dc0> [L]
#> Parent: <environment: package:teal.code>
#> Bindings:
#> • x: <dbl> [L]
#> • a: <dbl> [L]
#> • b: <dbl> [L]

# Normal R code
ls()
#> [1] "q"
a <- 1
b <- 2
for (x in c(1, 2)) {
  b <- a
  b <- b + a + 1
  b + 3 -> b
}
ls()
#> [1] "a" "b" "q" "x"

^{Created on 2024-12-03 with reprex v2.1.1}

I don't think this is a bug. In normal R code x appears as an object even if it is only defined as a variable to iterate with.

[m7pr]

Thanks @llrs-roche for the reply, I need to rethink if we should return the code for x or not