diff options
| author | Nicholas Clark <nick@ccl4.org> | 2010-12-27 12:56:12 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2010-12-27 12:56:12 +0000 |
| commit | 81745e4ea46c80112d1a0b69e99c8111889ce6d1 (patch) | |
| tree | 8908db476bdfee8077bb3a106ce6800875d91901 /embed.fnc | |
| parent | fa54efaecf052db2a7799ec4c2433eeb1576402e (diff) | |
| download | perl-81745e4ea46c80112d1a0b69e99c8111889ce6d1.tar.gz | |
Move do_chomp() from pp.c to doop.c, and make it static.
It was never part of the public API, and only ever used by pp_{s,}cho{,m}p.
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -353,8 +353,6 @@ Ap |bool |do_openn |NN GV *gv|NN const char *oname|I32 len \ p |bool |do_print |NULLOK SV* sv|NN PerlIO* fp : Used in pp_sys.c pR |OP* |do_readline -: Used in pp.c -p |void |do_chomp |NN SV *retval|NN SV *sv|bool chomping : Defined in doio.c, used only in pp_sys.c p |bool |do_seek |NULLOK GV* gv|Off_t pos|int whence Ap |void |do_sprintf |NN SV* sv|I32 len|NN SV** sarg @@ -1643,6 +1641,7 @@ s |SV * |incpush_if_exists|NN AV *const av|NN SV *dir|NN SV *const stem #endif #if defined(PERL_IN_PP_C) +s |void |do_chomp |NN SV *retval|NN SV *sv|bool chomping s |OP* |do_delete_local sR |SV* |refto |NN SV* sv #endif |