Hi,

I downloaded 2.8.1 and tried to compile it using gcc 3.4.6. (simple install, 
just ./configure, make, make check, make install)

I found that it compiled and went through the tests fine.

The foreign library, however, that seems to be segfaulting on me (see output 
below). I did see an old posting about a similar problem, but there was no 
resolution. Have other people experienced this at all?

Tia!
-y

> library(foreign)

 *** caught segfault ***
address fe899a60, cause 'invalid permissions'

Traceback:
 1: .C("spss_init", PACKAGE = "foreign")
 2: fun(...)
 3: doTryCatch(return(expr), name, parentenv, handler)
 4: tryCatchOne(expr, names, parentenv, handlers[[1]])
 5: tryCatchList(expr, classes, parentenv, handlers)
 6: tryCatch(expr, error = function(e) {    call <- conditionCall(e)    if 
(!is.null(call)) {        if (identical(call[[1]], quote(doTryCatch)))          
   call <- sys.call(-4)        dcall <- deparse(call)[1]        prefix <- 
paste("Error in", dcall, ": ")        LONG <- 75        msg <- 
conditionMessage(e)        sm <- strsplit(msg, "\n")[[1]]        if (14 + 
nchar(dcall, type = "w") + nchar(sm[1], type = "w") >             LONG)         
    prefix <- paste(prefix, "\n  ", sep = "")    }    else prefix <- "Error : " 
   msg <- paste(prefix, conditionMessage(e), "\n", sep = "")    
.Internal(seterrmessage(msg[1]))    if (!silent && 
identical(getOption("show.error.messages"),         TRUE)) {        cat(msg, 
file = stderr())        .Internal(printDeferredWarnings())    }    
invisible(structure(msg, class = "try-error"))})
 7: try({    fun(...)    NULL})
 8: runHook(".onLoad", package, env, package.lib, package)
 9: loadNamespace(package, c(which.lib.loc, lib.loc), keep.source = keep.source)
10: doTryCatch(return(expr), name, parentenv, handler)
11: tryCatchOne(expr, names, parentenv, handlers[[1]])
12: tryCatchList(expr, classes, parentenv, handlers)
13: tryCatch(expr, error = function(e) {    call <- conditionCall(e)    if 
(!is.null(call)) {        if (identical(call[[1]], quote(doTryCatch)))          
   call <- sys.call(-4)        dcall <- deparse(call)[1]        prefix <- 
paste("Error in", dcall, ": ")        LONG <- 75        msg <- 
conditionMessage(e)        sm <- strsplit(msg, "\n")[[1]]        if (14 + 
nchar(dcall, type = "w") + nchar(sm[1], type = "w") >             LONG)         
    prefix <- paste(prefix, "\n  ", sep = "")    }    else prefix <- "Error : " 
   msg <- paste(prefix, conditionMessage(e), "\n", sep = "")    
.Internal(seterrmessage(msg[1]))    if (!silent && 
identical(getOption("show.error.messages"),         TRUE)) {        cat(msg, 
file = stderr())        .Internal(printDeferredWarnings())    }    
invisible(structure(msg, class = "try-error"))})
14: try({    ns <- loadNamespace(package, c(which.lib.loc, lib.loc), 
keep.source = keep.source)    dataPath <- file.path(which.lib.loc, package, 
"data")    env <- attachNamespace(ns, pos = pos, dataPath = dataPath)})
15: library(foreign)

Possible actions:
1: abort (with core dump, if enabled)
2: normal R exit
3: exit R without saving workspace
4: exit R saving workspace
Selection: 4

        [[alternative HTML version deleted]]

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to