Mercurial > pub > dyncall > bindings
view R/rdc/demo/sqrt.R @ 30:baf087cf5971
- fixed two ref counting problems
- minor improvements
author | Tassilo Philipp |
---|---|
date | Fri, 10 Apr 2020 20:35:19 +0200 |
parents | 0cfcc391201f |
children |
line wrap: on
line source
# File: rdc/demo/sqrt.R # Description: call sqrt if (.Platform$OS.type == "unix") { dyn.load("/lib/libc.so.6") } else { dyn.load("/windows/system32/msvcrt") } sym.sqrt <- getNativeSymbolInfo("sqrt") x <- 144.0 rdcCall( sym.sqrt$address, "d)d", x)