1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
|
\name{isCurrent}
\alias{isCurrent}
\alias{isCurrent,ANY,ANY-method}
\title{Use version information to test whether class is current}
\description{
This generic function uses \code{\link{Versioned-class}} information
to ask whether an instance of a class (e.g., read from disk) has
current version information.
By default, \code{isCurrent} has the following behaviors:
\describe{
\item{\code{isCurrent(Versioned-instance)}}{Returns a vector of
logicals, indicating whether each version matches the current version
from the class prototype.}
\item{\code{isCurrent(ANY)}}{Return \code{NA}, indicating that the
version cannot be determined}
\item{\code{isCurrent(Versioned-instance, "class")}}{Returns a
logical vector indicating whether version identifiers shared between
\code{Versioned-instance} and \code{"class"} are current.}
}
Starting with R-2.6 / Bioconductor 2.1 / Biobase 1.15.1,
\code{isCurrent(Versioned-instance, ...)} returns an element \code{S4}
indicating whether the class has the `S4' bit set; a value of
\code{FALSE} indicates that the object needs to be recreated.
}
\usage{
isCurrent(object, value)
}
\arguments{
\item{object}{Object whose version is to be determined, as described above.}
\item{value}{(Optional) character string identifying a class with which to compare versions.}
}
\value{
\code{isCurrent} returns a logical vector.
}
\author{Biocore team}
\seealso{\code{\link{Versions-class}}}
\examples{
obj <- new("VersionedBiobase")
isCurrent(obj)
isCurrent(1:10) # NA
A <- setClass("A", contains="VersionedBiobase",
prototype=prototype(new("VersionedBiobase", versions=c(A="1.0.0"))))
a <- A()
classVersion(a)
isCurrent(a, "VersionedBiobase") # is the 'VersionedBiobase' portion current?
classVersion(a)["A"] <- "1.0.1"
classVersion(a)
isCurrent(a, "VersionedBiobase")
isCurrent(a) # more recent, so does not match 'current' defined by prototype
removeClass("A")
}
\keyword{manip}
|
