From jlindsey@alpha.luc.ac.be  Mon Mar 29 08:32:11 1999
From: jlindsey@alpha.luc.ac.be (jlindsey@alpha.luc.ac.be)
Date: Mon, 29 Mar 1999 09:32:11 +0200
Subject: problems with formals and get (PR#151)
Message-ID: <199903290732.JAA28031@blueberry.kubism.ku.dk>

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


problems with formals and get (PR#151)
jlindsey@alpha.luc.ac.be