summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2007-01-26 16:16:29 +0000
committerNicholas Clark <nick@ccl4.org>2007-01-26 16:16:29 +0000
commitd9095cec1bba87df718f5a1d0a9ab42fe217cea4 (patch)
treec9fa8049db941c9278d890ee93ab5c93553b70d7 /embed.fnc
parentabf8b121784743d34fc5407ef35129d1bbdffb2d (diff)
downloadperl-d9095cec1bba87df718f5a1d0a9ab42fe217cea4.tar.gz
Stop S_incline needing to temporarily write a '\0' into its passed-in
buffer. (Requires adding gv_fetchfile_flags(), savesharedpvn() and CopFILE_setn() to provide pointer/length versions of APIs) p4raw-id: //depot/perl@30015
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc5
1 files changed, 4 insertions, 1 deletions
diff --git a/embed.fnc b/embed.fnc
index eeedaf8886..fa499bfd07 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -278,6 +278,8 @@ Ap |void |gv_efullname |NN SV* sv|NN const GV* gv
Apmb |void |gv_efullname3 |NN SV* sv|NN const GV* gv|NULLOK const char* prefix
Ap |void |gv_efullname4 |NN SV* sv|NN const GV* gv|NULLOK const char* prefix|bool keepmain
Ap |GV* |gv_fetchfile |NN const char* name
+Ap |GV* |gv_fetchfile_flags|NN const char *const name|const STRLEN len\
+ |const U32 flags
Apd |GV* |gv_fetchmeth |NULLOK HV* stash|NN const char* name|STRLEN len|I32 level
Apd |GV* |gv_fetchmeth_autoload |NULLOK HV* stash|NN const char* name|STRLEN len|I32 level
Apdmb |GV* |gv_fetchmethod |NULLOK HV* stash|NN const char* name
@@ -704,6 +706,7 @@ p |I32 |same_dirent |NN const char* a|NN const char* b
Apda |char* |savepv |NULLOK const char* pv
Apda |char* |savepvn |NULLOK const char* pv|I32 len
Apda |char* |savesharedpv |NULLOK const char* pv
+Apda |char* |savesharedpvn |NN const char *const pv|const STRLEN len
Apda |char* |savesvpv |NN SV* sv
Ap |void |savestack_grow
Ap |void |savestack_grow_cnt |I32 need
@@ -1488,7 +1491,7 @@ s |void |checkcomma |NN const char *s|NN const char *name \
|NN const char *what
s |bool |feature_is_enabled|NN const char* name|STRLEN namelen
s |void |force_ident |NN const char *s|int kind
-s |void |incline |NN char *s
+s |void |incline |NN const char *s
s |int |intuit_method |NN char *s|NULLOK GV *gv|NULLOK CV *cv
s |int |intuit_more |NN char *s
s |I32 |lop |I32 f|int x|NN char *s