Don't warn on use of CCFLAGS

[p5sagit/p5-mst-13.2.git] / doop.c

diff --git a/doop.c b/doop.c
index f16ec64..f1392ff 100644 (file)
--- a/doop.c
+++ b/doop.c
@@ -667,6 +667,9 @@ dARGS
 
     (void)hv_iterinit(hv);     /* always reset iterator regardless */
 
+    if (op->op_private & OPpLEAVE_VOID)
+       RETURN;
+
     if (GIMME != G_ARRAY) {
        I32 i;
        dTARGET;