diff options
| author | Nicholas Clark <nick@ccl4.org> | 2007-04-10 14:49:31 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2007-04-10 14:49:31 +0000 |
| commit | c4bd3ae5119ffa374bc2a939fae6f0e624cc7804 (patch) | |
| tree | 07d2f4eb851148631155acca8aa7b41177233b13 /proto.h | |
| parent | 1cdf7faf9fb9e7feb64bb63a4448c8361e406417 (diff) | |
| download | perl-c4bd3ae5119ffa374bc2a939fae6f0e624cc7804.tar.gz | |
S_forget_pmop() only needs a flags argument for the ithreads case,
because PmopSTASH_free() is a no-op in an unthreaded perl.
p4raw-id: //depot/perl@30891
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -3240,9 +3240,15 @@ STATIC bool S_is_handle_constructor(const OP *o, I32 numargs) STATIC I32 S_is_list_assignment(pTHX_ const OP *o) __attribute__warn_unused_result__; +# ifdef USE_ITHREADS STATIC void S_forget_pmop(pTHX_ PMOP *const o, U32 flags) __attribute__nonnull__(pTHX_1); +# else +STATIC void S_forget_pmop(pTHX_ PMOP *const o) + __attribute__nonnull__(pTHX_1); + +# endif STATIC void S_find_and_forget_pmops(pTHX_ OP *o) __attribute__nonnull__(pTHX_1); |