annotate R/rdyncall/demo/R_malloc.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 |
|
| rev |
line source |
|
0
|
1 # Package: rdyncall
|
|
|
2 # File: demo/R_malloc.R
|
|
|
3 # Description: using R's memory allocator directly in R
|
|
|
4
|
|
|
5 dynbind("R","R_chk_calloc(ii)p;R_chk_free(p)v;")
|
|
|
6 malloc <- function(size)
|
|
|
7 {
|
|
|
8 x <- R_chk_calloc(as.integer(size),1L)
|
|
|
9 reg.finalizer(x, R_chk_free)
|
|
|
10 return(x)
|
|
|
11 }
|
|
|
12
|
|
|
13 x <- malloc(1024)
|
|
|
14 x <- NULL
|
|
|
15 gc()
|
|
|
16
|
