problems with formals and get (PR#151)

[jlindsey@alpha.luc.ac.be]

With 0.63.3, try

test <- function(){
	fn <- function(a) print("hello")
	print(is.function(fn))
	print(names(formals("fn")))}
test()

if fn is not quoted in the last line of test, it works properly.

test <- function(){
	fn <- function() print("hello")
	formals(fn) <- alist(a=,b=)
	return(fn)}
formals(test())

now try with line 3 of test changed to
	formals(fn) <- alist(a=)

Jim

-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
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
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._