&CORE::fork()

In commit 7fa5bd9b5, I not only forgot about getpwent (see commit
cc131e4, in which I mistakenly called it pwent), but fork as well.
Again, all this commit has to do is add it to the list of ‘ampable’
functions in gv.c.  The rest already works.

2 files changed, 3 insertions, 0 deletions

diff --git a/gv.c b/gv.c
index aaa64418ca..edc6202d63 100644
--- a/gv.c
+++ b/gv.c
@@ -1356,6 +1356,7 @@ Perl_gv_fetchpvn_flags(pTHX_ const char *nambeg, STRLEN full_len, I32 flags,
 	    case KEY_continue: case KEY_endgrent: case KEY_endhostent:
 	    case KEY_endnetent: case KEY_endprotoent: case KEY_endpwent:
 	    case KEY_endservent: case KEY_getgrent: case KEY_gethostent:
+	    case KEY_fork:
 	    case KEY_getlogin: case KEY_getnetent: case KEY_getppid:
 	    case KEY_getprotoent: case KEY_getservent: case KEY_getpwent:
 	    case KEY_setgrent:
diff --git a/t/op/coresubs.t b/t/op/coresubs.t
index 0aa9c38ca9..d1a2edc298 100644
--- a/t/op/coresubs.t
+++ b/t/op/coresubs.t
@@ -69,6 +69,8 @@ test_proto $_ for qw(
  endgrent endhostent endnetent endprotoent endpwent endservent
 );
 
+test_proto 'fork';
+
 test_proto "get$_" for qw '
   grent hostent login
   netent ppid protoent