diff options
| author | David Mitchell <davem@iabyn.com> | 2010-07-03 14:24:11 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2010-07-03 16:25:59 +0100 |
| commit | 0d7d409d8d92b77ed7de5b74ab047eced86edfc3 (patch) | |
| tree | fe3c9d84e4283e03a927b8ed309abc3415be8d31 /embed.fnc | |
| parent | 79a8d5295c08d08001ca69256d5a990d05ee1556 (diff) | |
| download | perl-0d7d409d8d92b77ed7de5b74ab047eced86edfc3.tar.gz | |
add my_[l]stat_flags(); make my_[l]stat() mathoms
my_stat() and my_lstat() call get magic on the stack arg, so create _flags()
variants that allow us to control this. (I can't just change the signature
or the mg_get() behaviour since my_[l]stat() are listed as being in the
public API, even though they're undocumented.)
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -738,7 +738,8 @@ Ap |I32 |my_fflush_all Anp |Pid_t |my_fork Anp |void |atfork_lock Anp |void |atfork_unlock -Ap |I32 |my_lstat +Apmb |I32 |my_lstat +pX |I32 |my_lstat_flags |NULLOK const U32 flags #if !defined(HAS_MEMCMP) || !defined(HAS_SANE_MEMCMP) AnpP |I32 |my_memcmp |NN const char* s1|NN const char* s2|I32 len #endif @@ -749,7 +750,8 @@ Ap |I32 |my_pclose |NULLOK PerlIO* ptr Ap |PerlIO*|my_popen |NN const char* cmd|NN const char* mode Ap |PerlIO*|my_popen_list |NN const char* mode|int n|NN SV ** args Ap |void |my_setenv |NULLOK const char* nam|NULLOK const char* val -Ap |I32 |my_stat +Apmb |I32 |my_stat +pX |I32 |my_stat_flags |NULLOK const U32 flags Ap |char * |my_strftime |NN const char *fmt|int sec|int min|int hour|int mday|int mon|int year|int wday|int yday|int isdst #if defined(MYSWAP) ApPa |short |my_swap |short s |