| 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 |
| 89 |
switch (what) |
switch (what) |
| 90 |
{ |
{ |
| 91 |
case PCRE_INFO_OPTIONS: |
case PCRE_INFO_OPTIONS: |
| 92 |
*((unsigned long int *)where) = re->options & PUBLIC_OPTIONS; |
*((unsigned long int *)where) = re->options & PUBLIC_COMPILE_OPTIONS; |
| 93 |
break; |
break; |
| 94 |
|
|
| 95 |
case PCRE_INFO_SIZE: |
case PCRE_INFO_SIZE: |