/[dtapublic]/projs/trunk/shared_source/tcl_base/tclregexp.h
ViewVC logotype

Contents of /projs/trunk/shared_source/tcl_base/tclregexp.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 42 - (show annotations) (download)
Fri Oct 14 01:50:00 2016 UTC (8 years, 2 months ago) by dashley
File MIME type: text/plain
File size: 2107 byte(s)
Move shared source code to commonize.
1 /* $Header: /cvsroot/esrg/sfesrg/esrgpcpj/shared/tcl_base/tclregexp.h,v 1.1.1.1 2001/06/13 04:45:39 dtashley Exp $ */
2
3 /*
4 * tclRegexp.h --
5 *
6 * This file contains definitions used internally by Henry
7 * Spencer's regular expression code.
8 *
9 * Copyright (c) 1998 by Sun Microsystems, Inc.
10 * Copyright (c) 1998-1999 by Scriptics Corporation.
11 *
12 * See the file "license.terms" for information on usage and redistribution
13 * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
14 *
15 * RCS: @(#) $Id: tclregexp.h,v 1.1.1.1 2001/06/13 04:45:39 dtashley Exp $
16 */
17
18 #ifndef _TCLREGEXP
19 #define _TCLREGEXP
20
21 #include "regex.h"
22
23 #ifdef BUILD_tcl
24 # undef TCL_STORAGE_CLASS
25 # define TCL_STORAGE_CLASS DLLEXPORT
26 #endif
27
28 /*
29 * The TclRegexp structure encapsulates a compiled regex_t,
30 * the flags that were used to compile it, and an array of pointers
31 * that are used to indicate subexpressions after a call to Tcl_RegExpExec.
32 * Note that the string and objPtr are mutually exclusive. These values
33 * are needed by Tcl_RegExpRange in order to return pointers into the
34 * original string.
35 */
36
37 typedef struct TclRegexp {
38 int flags; /* Regexp compile flags. */
39 regex_t re; /* Compiled re, includes number of
40 * subexpressions. */
41 CONST char *string; /* Last string passed to Tcl_RegExpExec. */
42 Tcl_Obj *objPtr; /* Last object passed to Tcl_RegExpExecObj. */
43 regmatch_t *matches; /* Array of indices into the Tcl_UniChar
44 * representation of the last string matched
45 * with this regexp to indicate the location
46 * of subexpressions. */
47 rm_detail_t details; /* Detailed information on match (currently
48 * used only for REG_EXPECT). */
49 int refCount; /* Count of number of references to this
50 * compiled regexp. */
51 } TclRegexp;
52
53 #endif /* _TCLREGEXP */
54
55
56
57 /* $History: tclregexp.h $
58 *
59 * ***************** Version 1 *****************
60 * User: Dtashley Date: 1/02/01 Time: 1:04a
61 * Created in $/IjuScripter, IjuConsole/Source/Tcl Base
62 * Initial check-in.
63 */
64
65 /* End of TCLREGEXP.H */

dashley@gmail.com
ViewVC Help
Powered by ViewVC 1.1.25