Merge pull request #1588 from olivroy/non-api

tidyverse · Jun 26, 2024 · 7ead2f5 · 7ead2f5
2 parents 0686ca5 + 620c4d8
commit 7ead2f5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/matrixToDataFrame.c b/src/matrixToDataFrame.c
@@ -34,7 +34,7 @@ static void copy_attributes(SEXP out, SEXP data)
   }
   SET_OBJECT(out, OBJECT(data));
   if (IS_S4_OBJECT(data)) {
-    SET_S4_OBJECT(out);
+    Rf_asS4(out, TRUE, FALSE);
   }
 }