Displaying 1 result from an estimated 1 matches for "bug3".
Did you mean:
bug
2001 Apr 10
0
segfault on Linux from buffer overflow in warning() ? (PR#905)
...1600) {
str <- as.character(1:n)
dup <- duplicated(c(str,str))
trywarn <- paste("duplicates:",paste(which(dup),collapse=","))
cat("Length of warning message:",nchar(trywarn),"\n")
warning(trywarn)
## problem is in warning() ...
}
provoke.bug3 <- function(n=1600) {
warnmsg <- paste(LETTERS[sample(1:26,n,replace=TRUE)],collapse="")
warning(warnmsg)
}
## crashes if warning message is > 8191 characters
--please do not edit the information below--
Version:
platform = i686-pc-linux-gnu
arch = i686
os = linux-gn...