local({
    info <- loadingNamespaceInfo()
    ns <- .Internal(getRegisteredNamespace(as.name(info$pkgname)))
    if (is.null(ns))
        stop("can't find name space environment");
    dataFile <- file.path(info$libname, info$pkgname, "R", "all.rda")
    load(dataFile, ns)
})
library("methods")
library("Biobase")
