Nothing
setGeneric( "is_extension", function(object){
standardGeneric("is_extension")
} )
setMethod( "is_extension", "FieldDescriptor", function(object){
.Call(FieldDescriptor__is_extension, object@pointer)
})
setMethod( "number", "FieldDescriptor", function(object){
.Call(FieldDescriptor__number, object@pointer)
} )
TYPE_DOUBLE <- 1L
TYPE_FLOAT <- 2L
TYPE_INT64 <- 3L
TYPE_UINT64 <- 4L
TYPE_INT32 <- 5L
TYPE_FIXED64 <- 6L
TYPE_FIXED32 <- 7L
TYPE_BOOL <- 8L
TYPE_STRING <- 9L
TYPE_GROUP <- 10L
TYPE_MESSAGE <- 11L
TYPE_BYTES <- 12L
TYPE_UINT32 <- 13L
TYPE_ENUM <- 14L
TYPE_SFIXED32 <- 15L
TYPE_SFIXED64 <- 16L
TYPE_SINT32 <- 17L
TYPE_SINT64 <- 18L
.TYPES <- sapply(ls( pattern="^TYPE_" ), function(x) get(x))
setGeneric( "type", function(object, as.string = FALSE){
standardGeneric( "type" )
} )
setMethod( "type", "FieldDescriptor", function(object, as.string = FALSE){
type <- .Call(FieldDescriptor__type, object@pointer)
if( as.string ) {
names(which(.TYPES == type))
} else {
type
}
} )
CPPTYPE_INT32 <- 1L
CPPTYPE_INT64 <- 2L
CPPTYPE_UINT32 <- 3L
CPPTYPE_UINT64 <- 4L
CPPTYPE_DOUBLE <- 5L
CPPTYPE_FLOAT <- 6L
CPPTYPE_BOOL <- 7L
CPPTYPE_ENUM <- 8L
CPPTYPE_STRING <- 9L
CPPTYPE_MESSAGE <- 10L
.CPPTYPES <- sapply(ls( pattern="^CPPTYPE_" ), function(x) get(x))
setGeneric( "cpp_type", function(object, as.string = FALSE ){
standardGeneric( "cpp_type" )
} )
setMethod( "cpp_type", "FieldDescriptor", function(object, as.string = FALSE){
cpptype <- .Call(FieldDescriptor__cpp_type, object@pointer)
if( as.string ) {
names(which(.CPPTYPES == cpptype))
} else {
cpptype
}
} )
LABEL_OPTIONAL <- 1L
LABEL_REQUIRED <- 2L
LABEL_REPEATED <- 3L
.LABELS <- sapply(ls( pattern="^LABEL_" ), function(x) get(x))
setGeneric( "label", function(object, as.string = FALSE ){
standardGeneric( "label" )
} )
setMethod( "label", "FieldDescriptor", function(object, as.string = FALSE){
lab <- .Call(FieldDescriptor__label, object@pointer)
if( as.string ) {
names(which(.LABELS == lab))
} else {
lab
}
} )
setGeneric( "is_repeated", function(object ){
standardGeneric( "is_repeated" )
} )
setMethod( "is_repeated", "FieldDescriptor", function(object){
.Call(FieldDescriptor__is_repeated, object@pointer)
} )
setGeneric( "is_optional", function(object){
standardGeneric( "is_optional" )
} )
setMethod( "is_optional", "FieldDescriptor", function(object){
.Call(FieldDescriptor__is_optional, object@pointer)
} )
setGeneric( "is_required", function(object ){
standardGeneric( "is_required" )
} )
setMethod( "is_required", "FieldDescriptor", function(object){
.Call(FieldDescriptor__is_required, object@pointer)
} )
setGeneric( "has_default_value", function(object ){
standardGeneric( "has_default_value" )
} )
setMethod( "has_default_value", "FieldDescriptor", function(object){
.Call(FieldDescriptor__has_default_value, object@pointer)
} )
setGeneric( "default_value", function(object ){
standardGeneric( "default_value" )
} )
setMethod( "default_value", "FieldDescriptor", function(object){
.Call(FieldDescriptor__default_value, object@pointer)
} )
setGeneric( "message_type", function(object ){
standardGeneric( "message_type" )
} )
setMethod( "message_type", "FieldDescriptor", function(object){
.Call(FieldDescriptor__message_type, object@pointer)
} )
setMethod( "enum_type", c( object = "FieldDescriptor", index = "missing", name = "missing"), function(object){
.Call(FieldDescriptor__enum_type, object@pointer)
} )
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.