Package randomForest enabled

zslajchrt · zslajchrt · commit 509ad27196a6 · 2018-07-24T13:34:54.000+02:00
diff --git a/com.oracle.truffle.r.native/fficall/src/truffle_nfi/Memory.c b/com.oracle.truffle.r.native/fficall/src/truffle_nfi/Memory.c
@@ -33,7 +33,7 @@ char *R_alloc(size_t n, int size) {
 // This is S compatible version of R_alloc
 char *S_alloc(long n, int size) {
     char *p = R_alloc(n, size);
-    memset(p, 0, n);
+    memset(p, 0, n * size);
     return p;
 }
 

Original file line number	Diff line number	Diff line change
`@@ -33,7 +33,7 @@ char *R_alloc(size_t n, int size) {`
`33`	`33`	`// This is S compatible version of R_alloc`
`34`	`34`	`char *S_alloc(long n, int size) {`
`35`	`35`	`char *p = R_alloc(n, size);`
`36`		`- memset(p, 0, n);`
	`36`	`+ memset(p, 0, n * size);`
`37`	`37`	`return p;`
`38`	`38`	`}`
`39`	`39`