### Name: codeChunk-class
### Title: Class "codeChunk"
### Aliases: codeChunk-class codeChunk chunk<- chunk chunkName
###   chunk<-,codeChunk-method chunk,codeChunk-method
###   chunkName,codeChunk-method evalChunk,codeChunk-method
###   getOptions,codeChunk-method show,codeChunk-method
###   SweaveOptions,codeChunk-method
### Keywords: classes

### ** Examples

    library(tools)
    testfile <- file.path(.path.package("tools"),
                           "Sweave", "Sweave-test-1.Rnw")
    if (file.exists(testfile)) {
        z <- Stangle(testfile,driver=tangleToR)
        getChunk(z,1)
    }