This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Another C<return NORMAL> needed post bb4c52e023e0, missed from 805bf316c58a.
authorNicholas Clark <nick@ccl4.org>
Thu, 3 Dec 2009 10:07:51 +0000 (10:07 +0000)
committerNicholas Clark <nick@ccl4.org>
Thu, 3 Dec 2009 10:45:55 +0000 (10:45 +0000)
pp.c

diff --git a/pp.c b/pp.c
index 292feb6..c659b13 100644 (file)
--- a/pp.c
+++ b/pp.c
@@ -3527,6 +3527,7 @@ PP(pp_crypt)
 #else
     DIE(aTHX_
       "The crypt() function is unimplemented due to excessive paranoia.");
+    return NORMAL;
 #endif
 }