Skip to content
Snippets Groups Projects
Commit e3c1cf55 authored by Lukas Stadler's avatar Lukas Stadler
Browse files

release logical arrays as "int[]" (instead of byte[])

parent 73979285
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
com.oracle.truffle.r.native/fficall/jni/src/rffiutils.c
+ 2
− 2
View file @ e3c1cf55
...@@ -99,7 +99,7 @@ void callExit(JNIEnv *env) { ...@@ -99,7 +99,7 @@ void callExit(JNIEnv *env) {
for (i = 0; i < copiedVectorsIndex; i++) { for (i = 0; i < copiedVectorsIndex; i++) {
CopiedVector cv = copiedVectors[i]; CopiedVector cv = copiedVectors[i];
switch (cv.type) { switch (cv.type) {
case INTSXP: { case INTSXP: case LGLSXP: {
jintArray intArray = (jintArray) cv.jArray; jintArray intArray = (jintArray) cv.jArray;
(*env)->ReleaseIntArrayElements(env, intArray, (jint *)cv.data, 0); (*env)->ReleaseIntArrayElements(env, intArray, (jint *)cv.data, 0);
break; break;
...@@ -112,7 +112,7 @@ void callExit(JNIEnv *env) { ...@@ -112,7 +112,7 @@ void callExit(JNIEnv *env) {
} }
case LGLSXP: case RAWSXP: { case RAWSXP: {
jbyteArray byteArray = (jbyteArray) cv.jArray; jbyteArray byteArray = (jbyteArray) cv.jArray;
(*env)->ReleaseByteArrayElements(env, byteArray, (jbyte *)cv.data, 0); (*env)->ReleaseByteArrayElements(env, byteArray, (jbyte *)cv.data, 0);
break; break;
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment