From f8f98e0a8bdbde83a9cdc3573d818f69d0a64c78 Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Sat, 7 Nov 2009 13:37:12 +0000 Subject: Add length and flags arguments to Perl_pad_findmy(), moving it to the public API. Currently no flags bits are used, and the length is cross-checked against strlen() on the pointer, but the intent is to re-work the entire pad API to be UTF-8 aware, from the current situation of char * pointers only. --- proto.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'proto.h') diff --git a/proto.h b/proto.h index 353f9c3d71..c3322b8169 100644 --- a/proto.h +++ b/proto.h @@ -2357,7 +2357,7 @@ PERL_CALLCONV PADOFFSET Perl_allocmy(pTHX_ const char *const name) #define PERL_ARGS_ASSERT_ALLOCMY \ assert(name) -PERL_CALLCONV PADOFFSET Perl_pad_findmy(pTHX_ const char* name) +PERL_CALLCONV PADOFFSET Perl_pad_findmy(pTHX_ const char* name, STRLEN len, U32 flags) __attribute__warn_unused_result__ __attribute__nonnull__(pTHX_1); #define PERL_ARGS_ASSERT_PAD_FINDMY \ -- cgit v1.2.1