diff options
author | Karl Williamson <public@khwilliamson.com> | 2013-10-16 21:09:00 -0600 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2013-11-26 21:03:40 -0700 |
commit | d9fe7d23bdbf0c9aeef4f48ea4e0c277e6c504d8 (patch) | |
tree | c07bda32e9f7ee6c6da221908374559aac73786e /proto.h | |
parent | 2a99ff865b7e95ea4a62ce50e45f728a34bdcb1f (diff) | |
download | perl-d9fe7d23bdbf0c9aeef4f48ea4e0c277e6c504d8.tar.gz |
mg.c: Extract code into a function.
This is in preparation for the same code to be used in additional
places. There should be no logic changes.
Diffstat (limited to 'proto.h')
-rw-r--r-- | proto.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -5883,6 +5883,11 @@ STATIC int S_adjust_size_and_find_bucket(size_t *nbytes_p) #endif #if defined(PERL_IN_MG_C) +STATIC void S_fixup_errno_string(pTHX_ SV* sv) + __attribute__nonnull__(pTHX_1); +#define PERL_ARGS_ASSERT_FIXUP_ERRNO_STRING \ + assert(sv) + STATIC SV* S_magic_methcall1(pTHX_ SV *sv, const MAGIC *mg, SV *meth, U32 flags, int n, SV *val) __attribute__nonnull__(pTHX_1) __attribute__nonnull__(pTHX_2) |