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
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Do not modify this file since it was automatically generated from:
%
% isGenericS3.R
%
% by the Rdoc compiler part of the R.oo package.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\name{isGenericS4}
\alias{isGenericS4.default}
\alias{isGenericS4}
\title{Checks if a function is a S4 generic function}
\description{
Checks if a function is a S4 generic function.
}
\usage{
\method{isGenericS4}{default}(fcn, envir=parent.frame(), ...)
}
\arguments{
\item{fcn}{A \code{\link[base]{function}} or a \code{\link[base]{character}} string.}
\item{...}{Not used.}
}
\details{
A function is considered to be a generic S4 function if its
body, that is the source code, contains the regular pattern
\code{"standardGeneric"}.
}
\value{
Returns \code{\link[base:logical]{TRUE}} if a generic S4 function, otherwise \code{\link[base:logical]{FALSE}}.
}
\author{Henrik Bengtsson}
\keyword{programming}
\keyword{methods}
\keyword{internal}
|
