getAttr problem

Hi all,

It seems that getAttr doesn't return "names" attribute properly as in
getAttrib(x, R_NamesSymbol));

If you look at section 4.7.4 in "Writing R Extensions", the second example of
SEXP out(SEXP, SEXP) returns NULL for the names attribute of the 
outer product. 

This is true for  R 1.7.0 on both Win2000 with mingw and Redhat 9.0 with gcc.

Is there something I am missing?
Best,
Tsvetan