From 12e535955872bb9be2b7a1c551528af1b0f2402d Mon Sep 17 00:00:00 2001 From: Ryota Suzuki Date: Thu, 7 May 2026 00:49:02 +0900 Subject: [PATCH] Use attribute-name vector length in rniGetAttrNames --- src/jri/src/Rengine.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/jri/src/Rengine.c b/src/jri/src/Rengine.c index f58f8f5..340bc2b 100644 --- a/src/jri/src/Rengine.c +++ b/src/jri/src/Rengine.c @@ -436,7 +436,7 @@ JNIEXPORT jobjectArray JNICALL Java_org_rosuda_JRI_Rengine_rniGetAttrNames jobjectArray sa; #if (R_VERSION >= R_Version(4,6,0)) SEXP ans = R_getAttribNames(o); - ac = (unsigned int) XLENGTH(o); + ac = (unsigned int) XLENGTH(ans); if (!ac) return 0; #else SEXP att = ATTRIB(o), ah = att;