R-alpha: cbind bug -- quick fix for some problems :

Kurt Hornik (Kurt.Hornik@ci.tuwien.ac.at)
Mon, 2 Dec 1996 12:11:55 +0100


Date: Mon, 2 Dec 1996 12:11:55 +0100
Message-Id: <199612021111.MAA14233@aragorn.ci.tuwien.ac.at>
From: Kurt Hornik <Kurt.Hornik@ci.tuwien.ac.at>
To: Martin Maechler <maechler@stat.math.ethz.ch>
Subject: R-alpha: cbind bug -- quick fix for  some problems :
In-Reply-To: <9612021016.AA07037@>

>>>>> On Mon, 2 Dec 96 11:16:34 +0100,
>>>>> Martin Maechler <maechler@stat.math.ethz.ch> said:

> This is the quick fix for some 'cbind' problems with  0.14

> 	cbind <- function(...).Internal(cbind(...))


> A partial diagnosis of original new 'cbind' bug:

> 	if( any.data.frame(...) ) 

> is NOT behaving decently :

> E.g.
>> if( any.data.frame(1,1:10, list(a=3)) ) TRUE
> 	Error in if (any.data.frame(1, 1:10, list(a = 3))) TRUE : missing value where logical needed

Amazing that any.data.frame() does not segfault for you ... it does for
me on Linux-elf as for Jim on Linux-aout.

Adding

	return ans;

at the end of SEXP do_anydf(SEXP call, SEXP op, SEXP args, SEXP env) in
src/main/dataframe.c seems to solve the problem (at least for me).

-k
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
r-testers mailing list -- For info or help, send "info" or "help",
To [un]subscribe, send "[un]subscribe"
(in the "body", not the subject !)  To: r-testers-request@stat.math.ethz.ch
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-