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]]


