/*
|
/*
|
* Definitions etc. for regexp(3) routines.
|
* Definitions etc. for regexp(3) routines.
|
*
|
*
|
* Caveat: this is V8 regexp(3) [actually, a reimplementation thereof],
|
* Caveat: this is V8 regexp(3) [actually, a reimplementation thereof],
|
* not the System V one.
|
* not the System V one.
|
*
|
*
|
* RCS: @(#) $Id: tclRegexp.h,v 1.1.1.1 2002-01-16 10:25:29 markom Exp $
|
* RCS: @(#) $Id: tclRegexp.h,v 1.1.1.1 2002-01-16 10:25:29 markom Exp $
|
*/
|
*/
|
|
|
#ifndef _REGEXP
|
#ifndef _REGEXP
|
#define _REGEXP 1
|
#define _REGEXP 1
|
|
|
#ifndef _TCL
|
#ifndef _TCL
|
#include "tcl.h"
|
#include "tcl.h"
|
#endif
|
#endif
|
|
|
#ifdef BUILD_tcl
|
#ifdef BUILD_tcl
|
# undef TCL_STORAGE_CLASS
|
# undef TCL_STORAGE_CLASS
|
# define TCL_STORAGE_CLASS DLLEXPORT
|
# define TCL_STORAGE_CLASS DLLEXPORT
|
#endif
|
#endif
|
|
|
/*
|
/*
|
* NSUBEXP must be at least 10, and no greater than 117 or the parser
|
* NSUBEXP must be at least 10, and no greater than 117 or the parser
|
* will not work properly.
|
* will not work properly.
|
*/
|
*/
|
|
|
#define NSUBEXP 20
|
#define NSUBEXP 20
|
|
|
typedef struct regexp {
|
typedef struct regexp {
|
char *startp[NSUBEXP];
|
char *startp[NSUBEXP];
|
char *endp[NSUBEXP];
|
char *endp[NSUBEXP];
|
char regstart; /* Internal use only. */
|
char regstart; /* Internal use only. */
|
char reganch; /* Internal use only. */
|
char reganch; /* Internal use only. */
|
char *regmust; /* Internal use only. */
|
char *regmust; /* Internal use only. */
|
int regmlen; /* Internal use only. */
|
int regmlen; /* Internal use only. */
|
char program[1]; /* Unwarranted chumminess with compiler. */
|
char program[1]; /* Unwarranted chumminess with compiler. */
|
} regexp;
|
} regexp;
|
|
|
EXTERN regexp *TclRegComp _ANSI_ARGS_((char *exp));
|
EXTERN regexp *TclRegComp _ANSI_ARGS_((char *exp));
|
EXTERN int TclRegExec _ANSI_ARGS_((regexp *prog, char *string, char *start));
|
EXTERN int TclRegExec _ANSI_ARGS_((regexp *prog, char *string, char *start));
|
EXTERN void TclRegSub _ANSI_ARGS_((regexp *prog, char *source, char *dest));
|
EXTERN void TclRegSub _ANSI_ARGS_((regexp *prog, char *source, char *dest));
|
EXTERN void TclRegError _ANSI_ARGS_((char *msg));
|
EXTERN void TclRegError _ANSI_ARGS_((char *msg));
|
EXTERN char *TclGetRegError _ANSI_ARGS_((void));
|
EXTERN char *TclGetRegError _ANSI_ARGS_((void));
|
|
|
# undef TCL_STORAGE_CLASS
|
# undef TCL_STORAGE_CLASS
|
# define TCL_STORAGE_CLASS DLLIMPORT
|
# define TCL_STORAGE_CLASS DLLIMPORT
|
|
|
#endif /* REGEXP */
|
#endif /* REGEXP */
|
|
|
