Mercurial > pub > dyncall > bindings
diff R/rdyncall/R/utils.R @ 0:0cfcc391201f
initial from svn dyncall-1745
author | Daniel Adler |
---|---|
date | Thu, 19 Mar 2015 22:26:28 +0100 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/R/rdyncall/R/utils.R Thu Mar 19 22:26:28 2015 +0100 @@ -0,0 +1,9 @@ +# Package: rdyncall +# File: R/utils.R +# Description: Low-level external pointer utility functions + +is.nullptr <- function(x) .Call("isnullptr", x, PACKAGE="rdyncall") +as.extptr <- function(x) .Call("asextptr", x, PACKAGE="rdyncall") +offsetPtr <- function(x, offset) .Call("offsetPtr", x, offset, PACKAGE="rdyncall") +is.externalptr <- function(x) (typeof(x) == "externalptr") +