Merge ftzero ftsock ftchr ftblk ftfile ftdir ftpipe into

Perl_pp_ftrowned

p4raw-id: //depot/perl@25961

1 files changed, 2 insertions, 1 deletions

diff --git a/opcode.pl b/opcode.pl
index e4cda78c0a..23f6c352fb 100755
--- a/opcode.pl
+++ b/opcode.pl
@@ -53,7 +53,8 @@ my @raw_alias = (
 		 Perl_pp_ssockopt => ['gsockopt'],
 		 Perl_pp_getpeername => ['getsockname'],
 		 Perl_pp_stat => ['lstat'],
-		 Perl_pp_ftrowned => ['fteowned'],
+		 Perl_pp_ftrowned => [qw(fteowned ftzero ftsock ftchr ftblk
+					 ftfile ftdir ftpipe)],
 		 Perl_pp_fttext => ['ftbinary'],
 		 Perl_pp_gmtime => ['localtime'],
 		 Perl_pp_semget => [qw(shmget msgget)],