summaryrefslogtreecommitdiff
path: root/dquote_static.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2011-01-29 10:11:39 -0700
committerKarl Williamson <public@khwilliamson.com>2011-01-29 10:26:41 -0700
commit881ffab65cdbee2f146ada660e5593bad2e71472 (patch)
treee8ede27d35417eb0e8de6b9039f75a62a9479343 /dquote_static.c
parent71556506e314e769ce97e03177d978fbd8a37c18 (diff)
downloadperl-881ffab65cdbee2f146ada660e5593bad2e71472.tar.gz
Use embed.pl inline capabilities for regcurly
Change the regcurly definition to use the new inline abilities.
Diffstat (limited to 'dquote_static.c')
-rw-r--r--dquote_static.c18
1 files changed, 6 insertions, 12 deletions
diff --git a/dquote_static.c b/dquote_static.c
index fbd8c3824d..532122134e 100644
--- a/dquote_static.c
+++ b/dquote_static.c
@@ -7,24 +7,18 @@
* It is currently #included by regcomp.c and toke.c.
*/
+#define PERL_IN_DQUOTE_STATIC_C
+#include "proto.h"
+#include "embed.h"
+
/*
- regcurly - a little FSA that accepts {\d+,?\d*}
Pulled from regcomp.c.
*/
-
-/* embed.pl doesn't yet know how to handle static inline functions, so
- manually decorate it here with gcc-style attributes.
-*/
-PERL_STATIC_INLINE I32
-regcurly(register const char *s)
- __attribute__warn_unused_result__
- __attribute__pure__
- __attribute__nonnull__(1);
-
PERL_STATIC_INLINE I32
-regcurly(register const char *s)
+S_regcurly(register const char *s)
{
- assert(s);
+ PERL_ARGS_ASSERT_REGCURLY;
if (*s++ != '{')
return FALSE;