--- code/trunk/pcre_fullinfo.c 2007/03/02 13:10:43 96 +++ code/trunk/pcre_fullinfo.c 2007/06/04 10:49:21 169 @@ -6,7 +6,7 @@ and semantics are as close as possible to those of the Perl 5 language. Written by Philip Hazel - Copyright (c) 1997-2006 University of Cambridge + Copyright (c) 1997-2007 University of Cambridge ----------------------------------------------------------------------------- Redistribution and use in source and binary forms, with or without @@ -61,7 +61,7 @@ Returns: 0 if data returned, negative on error */ -PCRE_DATA_SCOPE int +PCRE_EXP_DEFN int pcre_fullinfo(const pcre *argument_re, const pcre_extra *extra_data, int what, void *where) { @@ -139,6 +139,14 @@ case PCRE_INFO_DEFAULT_TABLES: *((const uschar **)where) = (const uschar *)(_pcre_default_tables); break; + + case PCRE_INFO_OKPARTIAL: + *((int *)where) = (re->options & PCRE_NOPARTIAL) == 0; + break; + + case PCRE_INFO_JCHANGED: + *((int *)where) = (re->options & PCRE_JCHANGED) != 0; + break; default: return PCRE_ERROR_BADOPTION; }