Change 15032 by jhi@alpha on 2002/03/05 02:05:23

        Must have a return.

Affected files ...

.... //depot/perl/pp_pack.c#21 edit

Differences ...

==== //depot/perl/pp_pack.c#21 (text) ====
Index: perl/pp_pack.c
--- perl/pp_pack.c.~1~  Mon Mar  4 19:15:05 2002
+++ perl/pp_pack.c      Mon Mar  4 19:15:05 2002
@@ -146,6 +146,7 @@
            pat = group_end(pat, patend, ']') + 1;
     }
     Perl_croak(aTHX_ "No group ending character `%c' found", ender);
+    return 0;
 }
 
 #define TYPE_IS_SHRIEKING      0x100
End of Patch.

Reply via email to