Why does `Rprof` list out `match.fun` actual function instead of its alias

Question

Rprof list out match.fun actual function instead of its alias (here func)

loopMillion <- function() { for(i in 1:1e6