R-alpha: signif( small , d) gives NA

[Martin Maechler]

signif(.) is a <primitive> function.

Unfortunately, I couldn't even find WHERE in the source,
  signif(.) is defined.

Here are the symptoms:

xmin <- .Machine $ double.xmin
signif(xmin,3) #--> NA

umach <- unlist(.Machine)[paste("double.x", c("min","max"), sep='')]
for(dig in 1:10) {cat("dig=",dig,": "); print(signif(umach, digits = dig))}


-------
Why do I "complain"?  
	-- it breaks  str(.Machine), now that I've improved 'str'.
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-devel-request@stat.math.ethz.ch
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-