Make the :bytes conditional on PerlIO.

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

diff --git a/mg.c b/mg.c
index 0c37807..63b9cfc 100644 (file)
--- a/mg.c
+++ b/mg.c
@@ -2450,7 +2450,7 @@ Perl_whichsig(pTHX_ char *sig)
     if (strEQ(sig,"CLD"))
        return SIGCHLD;
 #endif
-    return 0;
+    return -1;
 }
 
 #if !defined(PERL_IMPLICIT_CONTEXT)