--- projs/trunk/shared_source/c_tcl_base_7_5_w_mods/tclregexp.h 2016/10/31 00:57:34 67 +++ projs/trunk/shared_source/c_tcl_base_7_5_w_mods/tclregexp.h 2016/11/05 11:07:06 71 @@ -1,54 +1,54 @@ -/* $Header$ */ -/* - * tclRegexp.h -- - * - * This file contains definitions used internally by Henry - * Spencer's regular expression code. - * - * Copyright (c) 1998 by Sun Microsystems, Inc. - * Copyright (c) 1998-1999 by Scriptics Corporation. - * - * See the file "license.terms" for information on usage and redistribution - * of this file, and for a DISCLAIMER OF ALL WARRANTIES. - * - * RCS: @(#) $Id: tclregexp.h,v 1.1.1.1 2001/06/13 04:45:39 dtashley Exp $ - */ - -#ifndef _TCLREGEXP -#define _TCLREGEXP - -#include "regex.h" - -#ifdef BUILD_tcl -# undef TCL_STORAGE_CLASS -# define TCL_STORAGE_CLASS DLLEXPORT -#endif - -/* - * The TclRegexp structure encapsulates a compiled regex_t, - * the flags that were used to compile it, and an array of pointers - * that are used to indicate subexpressions after a call to Tcl_RegExpExec. - * Note that the string and objPtr are mutually exclusive. These values - * are needed by Tcl_RegExpRange in order to return pointers into the - * original string. - */ - -typedef struct TclRegexp { - int flags; /* Regexp compile flags. */ - regex_t re; /* Compiled re, includes number of - * subexpressions. */ - CONST char *string; /* Last string passed to Tcl_RegExpExec. */ - Tcl_Obj *objPtr; /* Last object passed to Tcl_RegExpExecObj. */ - regmatch_t *matches; /* Array of indices into the Tcl_UniChar - * representation of the last string matched - * with this regexp to indicate the location - * of subexpressions. */ - rm_detail_t details; /* Detailed information on match (currently - * used only for REG_EXPECT). */ - int refCount; /* Count of number of references to this - * compiled regexp. */ -} TclRegexp; - -#endif /* _TCLREGEXP */ - -/* End of tclregexp.h */ +/* $Header$ */ +/* + * tclRegexp.h -- + * + * This file contains definitions used internally by Henry + * Spencer's regular expression code. + * + * Copyright (c) 1998 by Sun Microsystems, Inc. + * Copyright (c) 1998-1999 by Scriptics Corporation. + * + * See the file "license.terms" for information on usage and redistribution + * of this file, and for a DISCLAIMER OF ALL WARRANTIES. + * + * RCS: @(#) $Id: tclregexp.h,v 1.1.1.1 2001/06/13 04:45:39 dtashley Exp $ + */ + +#ifndef _TCLREGEXP +#define _TCLREGEXP + +#include "regex.h" + +#ifdef BUILD_tcl +# undef TCL_STORAGE_CLASS +# define TCL_STORAGE_CLASS DLLEXPORT +#endif + +/* + * The TclRegexp structure encapsulates a compiled regex_t, + * the flags that were used to compile it, and an array of pointers + * that are used to indicate subexpressions after a call to Tcl_RegExpExec. + * Note that the string and objPtr are mutually exclusive. These values + * are needed by Tcl_RegExpRange in order to return pointers into the + * original string. + */ + +typedef struct TclRegexp { + int flags; /* Regexp compile flags. */ + regex_t re; /* Compiled re, includes number of + * subexpressions. */ + CONST char *string; /* Last string passed to Tcl_RegExpExec. */ + Tcl_Obj *objPtr; /* Last object passed to Tcl_RegExpExecObj. */ + regmatch_t *matches; /* Array of indices into the Tcl_UniChar + * representation of the last string matched + * with this regexp to indicate the location + * of subexpressions. */ + rm_detail_t details; /* Detailed information on match (currently + * used only for REG_EXPECT). */ + int refCount; /* Count of number of references to this + * compiled regexp. */ +} TclRegexp; + +#endif /* _TCLREGEXP */ + +/* End of tclregexp.h */