Rename G_ARRAY to G_LIST; provide back-compat when not(PERL_CORE)

1 files changed, 1 insertions, 1 deletions

diff --git a/os2/os2.c b/os2/os2.c
index ebe58b058b..7c4b6dd7da 100644
--- a/os2/os2.c
+++ b/os2/os2.c
@@ -1990,7 +1990,7 @@ XS(XS_OS2_perfSysCall)
         if (total) {
             int i,j;
 
-            if (GIMME_V != G_ARRAY) {
+            if (GIMME_V != G_LIST) {
                 PUSHn(u[0][0]);		/* Total ticks on the first processor */
                 XSRETURN(1);
             }