diff options
| author | Nicholas Clark <nick@ccl4.org> | 2009-06-22 20:45:23 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2009-06-22 20:45:23 +0100 |
| commit | 6eb667c676e523c76dfdaf169fce3797599bd851 (patch) | |
| tree | 6f7590778976260b05d3baf0074e136c536632fc /embed.fnc | |
| parent | 53409900a7d39827c92521617aae4258229bce49 (diff) | |
| download | perl-6eb667c676e523c76dfdaf169fce3797599bd851.tar.gz | |
Instead of a const char *, pass a HEK * to anonymise_cv().
This will cope properly with Unicode package names. It also allows use of more
efficient perl API calls, avoiding any strlen()s.
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1354,7 +1354,7 @@ paRxo |void* |get_arena |const size_t svtype|const U32 misc #if defined(PERL_IN_HV_C) || defined(PERL_DECL_PROT) s |void |hsplit |NN HV *hv s |void |hfreeentries |NN HV *hv -s |I32 |anonymise_cv |NULLOK const char *stash|NN SV *val +s |I32 |anonymise_cv |NULLOK HEK *stash|NN SV *val sa |HE* |new_he sanR |HEK* |save_hek_flags |NN const char *str|I32 len|U32 hash|int flags sn |void |hv_magic_check |NN HV *hv|NN bool *needs_copy|NN bool *needs_store |