This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Document new versions of Data::Dumper and XS::APItest.
[perl5.git]
/
opcode.h
diff --git
a/opcode.h
b/opcode.h
index
d747d9a
..
0a9628d
100644
(file)
--- a/
opcode.h
+++ b/
opcode.h
@@
-521,6
+521,7
@@
EXTCONST char* const PL_op_name[] = {
"rvalues",
"coreargs",
"runcv",
"rvalues",
"coreargs",
"runcv",
+ "fc",
};
#endif
};
#endif
@@
-901,6
+902,7
@@
EXTCONST char* const PL_op_desc[] = {
"values on reference",
"CORE:: subroutine",
"__SUB__",
"values on reference",
"CORE:: subroutine",
"__SUB__",
+ "fc",
};
#endif
};
#endif
@@
-1295,6
+1297,7
@@
EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
Perl_pp_rvalues, /* implemented by Perl_pp_rkeys */
Perl_pp_coreargs,
Perl_pp_runcv,
Perl_pp_rvalues, /* implemented by Perl_pp_rkeys */
Perl_pp_coreargs,
Perl_pp_runcv,
+ Perl_pp_fc,
}
#endif
#ifdef PERL_PPADDR_INITED
}
#endif
#ifdef PERL_PPADDR_INITED
@@
-1430,7
+1433,7
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_fun, /* vec */
Perl_ck_index, /* index */
Perl_ck_index, /* rindex */
Perl_ck_fun, /* vec */
Perl_ck_index, /* index */
Perl_ck_index, /* rindex */
- Perl_ck_
fun,
/* sprintf */
+ Perl_ck_
lfun,
/* sprintf */
Perl_ck_fun, /* formline */
Perl_ck_fun, /* ord */
Perl_ck_fun, /* chr */
Perl_ck_fun, /* formline */
Perl_ck_fun, /* ord */
Perl_ck_fun, /* chr */
@@
-1545,8
+1548,8
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_fun, /* sysread */
Perl_ck_fun, /* syswrite */
Perl_ck_eof, /* eof */
Perl_ck_fun, /* sysread */
Perl_ck_fun, /* syswrite */
Perl_ck_eof, /* eof */
- Perl_ck_
fun,
/* tell */
- Perl_ck_
fun,
/* seek */
+ Perl_ck_
tell,
/* tell */
+ Perl_ck_
tell,
/* seek */
Perl_ck_trunc, /* truncate */
Perl_ck_fun, /* fcntl */
Perl_ck_fun, /* ioctl */
Perl_ck_trunc, /* truncate */
Perl_ck_fun, /* fcntl */
Perl_ck_fun, /* ioctl */
@@
-1686,6
+1689,7
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_each, /* rvalues */
Perl_ck_null, /* coreargs */
Perl_ck_null, /* runcv */
Perl_ck_each, /* rvalues */
Perl_ck_null, /* coreargs */
Perl_ck_null, /* runcv */
+ Perl_ck_fun, /* fc */
}
#endif
#ifdef PERL_CHECK_INITED
}
#endif
#ifdef PERL_CHECK_INITED
@@
-2071,6
+2075,7
@@
EXTCONST U32 PL_opargs[] = {
0x00001b08, /* rvalues */
0x00000600, /* coreargs */
0x00000004, /* runcv */
0x00001b08, /* rvalues */
0x00000600, /* coreargs */
0x00000004, /* runcv */
+ 0x00009b8e, /* fc */
};
#endif
};
#endif