Incorrectly guessed spec for `list(x = tibble(...))`

[mgirlich]

x <- list(x = tibble(a = 1))
spec_guess(x)
#> spec_object(
#>   x = tib_scalar(
#>     "x",
#>     ptype = c("structure(list(a = numeric(0)), class = c(\"tbl_df\", \"tbl\", \"data.frame\"", "), row.names = integer(0))")
#>   )
#> )

^{Created on 2022-06-20 by the reprex package (v2.0.1)}

This should be something like

spec_object(
  x = tib_df("a", a = tib_int("a"))
)