diff options
Diffstat (limited to 'dquote_inline.h')
-rw-r--r-- | dquote_inline.h | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/dquote_inline.h b/dquote_inline.h deleted file mode 100644 index 59612ac7d8..0000000000 --- a/dquote_inline.h +++ /dev/null @@ -1,36 +0,0 @@ -/* dquote_inline.h - * - * Copyright (C) 2015 by Larry Wall and others - * - * You may distribute under the terms of either the GNU General Public - * License or the Artistic License, as specified in the README file. - */ - -#ifndef PERL_DQUOTE_INLINE_H_ /* Guard against nested #inclusion */ -#define PERL_DQUOTE_INLINE_H_ - -/* - - regcurly - a little FSA that accepts {\d+,?\d*} - Pulled from reg.c. - */ -PERL_STATIC_INLINE I32 -S_regcurly(const char *s) -{ - PERL_ARGS_ASSERT_REGCURLY; - - if (*s++ != '{') - return FALSE; - if (!isDIGIT(*s)) - return FALSE; - while (isDIGIT(*s)) - s++; - if (*s == ',') { - s++; - while (isDIGIT(*s)) - s++; - } - - return *s == '}'; -} - -#endif /* PERL_DQUOTE_INLINE_H_ */ |