| 6 |
and semantics are as close as possible to those of the Perl 5 language. |
and semantics are as close as possible to those of the Perl 5 language. |
| 7 |
|
|
| 8 |
Written by Philip Hazel |
Written by Philip Hazel |
| 9 |
Copyright (c) 1997-2008 University of Cambridge |
Copyright (c) 1997-2009 University of Cambridge |
| 10 |
|
|
| 11 |
----------------------------------------------------------------------------- |
----------------------------------------------------------------------------- |
| 12 |
Redistribution and use in source and binary forms, with or without |
Redistribution and use in source and binary forms, with or without |
| 39 |
|
|
| 40 |
|
|
| 41 |
/* This module contains an internal function that is used to match an extended |
/* This module contains an internal function that is used to match an extended |
| 42 |
class (one that contains characters whose values are > 255). It is used by both |
class. It is used by both pcre_exec() and pcre_def_exec(). */ |
|
pcre_exec() and pcre_def_exec(). */ |
|
| 43 |
|
|
| 44 |
|
|
| 45 |
#ifdef HAVE_CONFIG_H |
#ifdef HAVE_CONFIG_H |
| 54 |
*************************************************/ |
*************************************************/ |
| 55 |
|
|
| 56 |
/* This function is called to match a character against an extended class that |
/* This function is called to match a character against an extended class that |
| 57 |
might contain values > 255. |
might contain values > 255 and/or Unicode properties. |
| 58 |
|
|
| 59 |
Arguments: |
Arguments: |
| 60 |
c the character |
c the character |
| 103 |
#ifdef SUPPORT_UCP |
#ifdef SUPPORT_UCP |
| 104 |
else /* XCL_PROP & XCL_NOTPROP */ |
else /* XCL_PROP & XCL_NOTPROP */ |
| 105 |
{ |
{ |
| 106 |
const ucd_record * prop = GET_UCD(c); |
const ucd_record *prop = GET_UCD(c); |
| 107 |
|
|
| 108 |
switch(*data) |
switch(*data) |
| 109 |
{ |
{ |