traceback() is not being invoked correctly on error

[kevinushey]

For example, from https://community.rstudio.com/t/deployment-error-error-in-traceback-x-max-lines-max-lines/92617, the error trace has:

----- Error stack trace -----
Error in .traceback(x, max.lines = max.lines) :
length(max.lines) <= 1 is not TRUE
Calls: ... -> traceback -> .traceback -> stopifnot
Erros durante o embrulho: length(max.lines) <= 1 is not TRUE
Error: no more error handlers available (recursive errors?); invoking 'abort' restart
Execu��o interrompida

And we invoke traceback here:

$ ag -Q "traceback("
R/bundle.R
910:      traceback(3, sys.calls())

R/deployApp.R
162:      traceback(3, sys.calls())

But the second argument to traceback() is max.lines, not the R call stack.

[jmcphers]

Fixed via dbdc237