Internal error in `summarise()`

[DavisVaughan]

library(dplyr)

penguins |>
  summarize(
    .by = species,
    across(everything(), identity),
    spline = data.frame(spline(bill_len, bill_dep, n=4L))
  )
#> Error in names(dots)[[i]]: subscript out of bounds

Seems like i is 8, and dots is only length 2

I think i is the post-expanded index, i.e. it increments by 1 after each column across(everything(), identity) is applied to (7 cols), but we wanted the index incremented by 1 after each expression that we run, i.e. across(everything(), identity) should count as 1 in total.

[lbm364dl]

I guess the underlying problem is the same as #7657. I thought about passing the expanded quosures as dots argument in dplyr_error_handler but I guess that's not the best way to solve it since we want to refer to user quosures in the error message? A fix should essentially try to remap the post-expanded i back to the original position in dots?