av_delete is not portable according to ppport

rafl · Aug 4, 2008 · 55e9b24 · 55e9b24
1 parent 69637fd
commit 55e9b24
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/OPCheck.xs b/OPCheck.xs
@@ -230,7 +230,7 @@ CODE:
         for ( i = av_len(av); i >= 0; i-- ) {
             SV **elem = av_fetch(av, i, 0);;
             if ( elem && *elem == perlsub ) {
-                av_delete(av, i, G_DISCARD);
+                av_store(av, i, &PL_sv_undef);
                 break;
             }
         }