extend {Q7} | R Documentation |
Used only inside a type definition
extend(prototype)
prototype |
Q7type; function |
localized Q7type; function
Type1 <- type(function(arg1){
val1 <- arg1
get_val1 <- function(){
val1
}
}, "Type1")
Type2 <- type(function(arg1, arg2){
extend(Type1)(arg1)
val2 <- arg2
get_val2 <- function(){
val2
}
}, "Type2")
myType2 <- Type2("foo", "bar")
myType2$get_val1()
myType2$get_val2()