mgcv summary.gam

hi

I'm trying to understand (a little) the code behind summary.gam, and have
the Biometrika article referred to in the Help. But am stuck early on.

In the code, starting at line 167:

if (est.disp)
  rdf <- residual.df
else rdf <- -1
res <- testStat(p, Xt, V, df[i], type = p.type,
  res.df = rdf)

1) shouldn't there be some brackets in the if else statement?
2) what is testStat?

thanks

Greg