diff options
| author | ph10 <ph10@2f5784b3-3f2a-0410-8824-cb99058d5e15> | 2015-06-19 16:10:07 +0000 |
|---|---|---|
| committer | ph10 <ph10@2f5784b3-3f2a-0410-8824-cb99058d5e15> | 2015-06-19 16:10:07 +0000 |
| commit | cf565fb6b8347c3a139c8271557a15791446f755 (patch) | |
| tree | 02b09a3475c64e1196ee98e630ad30127f7e7b48 /pcre_compile.c | |
| parent | 68e2e67656942f34537a41f75b8548764283686d (diff) | |
| download | pcre-cf565fb6b8347c3a139c8271557a15791446f755.tar.gz | |
Recognize EBCDIC non-breaking space and give error for \p in a class when no
UCP support.
git-svn-id: svn://vcs.exim.org/pcre/code/trunk@1569 2f5784b3-3f2a-0410-8824-cb99058d5e15
Diffstat (limited to 'pcre_compile.c')
| -rw-r--r-- | pcre_compile.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/pcre_compile.c b/pcre_compile.c index 575ee7a..a9d1021 100644 --- a/pcre_compile.c +++ b/pcre_compile.c @@ -5218,9 +5218,9 @@ for (;; ptr++) cd, PRIV(vspace_list)); continue; -#ifdef SUPPORT_UCP case ESC_p: case ESC_P: +#ifdef SUPPORT_UCP { BOOL negated; unsigned int ptype = 0, pdata = 0; @@ -5234,6 +5234,9 @@ for (;; ptr++) class_has_8bitchar--; /* Undo! */ continue; } +#else + *errorcodeptr = ERR45; + goto FAILED; #endif /* Unrecognized escapes are faulted if PCRE is running in its strict mode. By default, for compatibility with Perl, they are |