The R Project SVN R

Rev

Rev 51899 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

# keep in step with tools/GETDISTNAME

status <- switch(R.version$status,
                 "Under development (unstable)" = "dev",
                 tolower(R.version$status))

res <- paste("R-", R.version$major, ".", R.version$minor, status, sep="")
cat(res)