edc7abc792
* contrib/hbole/oleauto.prg
* contrib/hbw32/w32_tole.prg
* MessageBox() calls converted to Alert()s.
A #translate added for the to be reconverted to MessageBox(),
since I'm not sure why should we use MessageBox()es here?
IMO it'd be better to throw RTEs, or handle these cases more
"natively". Opinions?
* contrib/hbole/oleauto.prg
+ Modified to generate RTE when the object could not
be created, so that it works more like OLE in hbw32.lib,
and the test doesn't crash in this case. I don't have
Excel, and this is what I could fix without it.
* contrib/hbw32/w32_tole.prg
* contrib/hbw32/w32_ole.c
! Typos, minor formatting.
* common.mak
* source/hbpcre/Makefile
* source/hbpcre/cnv_hb2o.bat
* source/hbpcre/cnv_o2hb.bat
- source/hbpcre/ucpinter.h
- source/hbpcre/ucptable.h
- source/hbpcre/pcrefind.c
+ source/hbpcre/pcreucd.c
* source/hbpcre/pcrevutf.c
* source/hbpcre/pcre.h
* source/hbpcre/pcreconf.c
* source/hbpcre/pcreinfo.c
* source/hbpcre/pcremktb.c
* source/hbpcre/config.h
* source/hbpcre/pcrenewl.c
* source/hbpcre/pcreoutf.c
* source/hbpcre/chartabs.c
* source/hbpcre/pcrerefc.c
* source/hbpcre/pcreget.c
* source/hbpcre/pcrefinf.c
* source/hbpcre/pcretryf.c
* source/hbpcre/pcreexec.c
* source/hbpcre/pcreinal.h
* source/hbpcre/pcretabs.c
* source/hbpcre/pcredfa.c
* source/hbpcre/pcrever.c
* source/hbpcre/pcrecomp.c
* source/hbpcre/pcrexcls.c
* source/hbpcre/pcrestud.c
* source/hbpcre/ucp.h
+ Updated to PCRE 7.8 RC1
(will be updated to final pretty soon)
This version contains the small patches we
so far had locally in Harbour. Thanks to
Philip Hazel for applying them.
129 lines
3.6 KiB
C
129 lines
3.6 KiB
C
/*************************************************
|
|
* Perl-Compatible Regular Expressions *
|
|
*************************************************/
|
|
|
|
/* PCRE is a library of functions to support regular expressions whose syntax
|
|
and semantics are as close as possible to those of the Perl 5 language.
|
|
|
|
Written by Philip Hazel
|
|
Copyright (c) 1997-2008 University of Cambridge
|
|
|
|
-----------------------------------------------------------------------------
|
|
Redistribution and use in source and binary forms, with or without
|
|
modification, are permitted provided that the following conditions are met:
|
|
|
|
* Redistributions of source code must retain the above copyright notice,
|
|
this list of conditions and the following disclaimer.
|
|
|
|
* Redistributions in binary form must reproduce the above copyright
|
|
notice, this list of conditions and the following disclaimer in the
|
|
documentation and/or other materials provided with the distribution.
|
|
|
|
* Neither the name of the University of Cambridge nor the names of its
|
|
contributors may be used to endorse or promote products derived from
|
|
this software without specific prior written permission.
|
|
|
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
|
|
AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
|
|
LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
POSSIBILITY OF SUCH DAMAGE.
|
|
-----------------------------------------------------------------------------
|
|
*/
|
|
|
|
|
|
/* This module contains the external function pcre_config(). */
|
|
|
|
|
|
#if 2875
|
|
#include "_hbconf.h"
|
|
#endif
|
|
|
|
#include "pcreinal.h"
|
|
|
|
|
|
/*************************************************
|
|
* Return info about what features are configured *
|
|
*************************************************/
|
|
|
|
/* This function has an extensible interface so that additional items can be
|
|
added compatibly.
|
|
|
|
Arguments:
|
|
what what information is required
|
|
where where to put the information
|
|
|
|
Returns: 0 if data returned, negative on error
|
|
*/
|
|
|
|
PCRE_EXP_DEFN int PCRE_CALL_CONVENTION
|
|
pcre_config(int what, void *where)
|
|
{
|
|
switch (what)
|
|
{
|
|
case PCRE_CONFIG_UTF8:
|
|
#ifdef SUPPORT_UTF8
|
|
*((int *)where) = 1;
|
|
#else
|
|
*((int *)where) = 0;
|
|
#endif
|
|
break;
|
|
|
|
case PCRE_CONFIG_UNICODE_PROPERTIES:
|
|
#ifdef SUPPORT_UCP
|
|
*((int *)where) = 1;
|
|
#else
|
|
*((int *)where) = 0;
|
|
#endif
|
|
break;
|
|
|
|
case PCRE_CONFIG_NEWLINE:
|
|
*((int *)where) = NEWLINE;
|
|
break;
|
|
|
|
case PCRE_CONFIG_BSR:
|
|
#ifdef BSR_ANYCRLF
|
|
*((int *)where) = 1;
|
|
#else
|
|
*((int *)where) = 0;
|
|
#endif
|
|
break;
|
|
|
|
case PCRE_CONFIG_LINK_SIZE:
|
|
*((int *)where) = LINK_SIZE;
|
|
break;
|
|
|
|
case PCRE_CONFIG_POSIX_MALLOC_THRESHOLD:
|
|
*((int *)where) = POSIX_MALLOC_THRESHOLD;
|
|
break;
|
|
|
|
case PCRE_CONFIG_MATCH_LIMIT:
|
|
*((unsigned int *)where) = MATCH_LIMIT;
|
|
break;
|
|
|
|
case PCRE_CONFIG_MATCH_LIMIT_RECURSION:
|
|
*((unsigned int *)where) = MATCH_LIMIT_RECURSION;
|
|
break;
|
|
|
|
case PCRE_CONFIG_STACKRECURSE:
|
|
#ifdef NO_RECURSE
|
|
*((int *)where) = 0;
|
|
#else
|
|
*((int *)where) = 1;
|
|
#endif
|
|
break;
|
|
|
|
default: return PCRE_ERROR_BADOPTION;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* End of pcre_config.c */
|