/[dtapublic]/projs/ets/trunk/src/c_tcl_base_7_5_w_mods/regcustom.h
ViewVC logotype

Diff of /projs/ets/trunk/src/c_tcl_base_7_5_w_mods/regcustom.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

projs/trunk/shared_source/tcl_base/regcustom.h revision 42 by dashley, Fri Oct 14 01:50:00 2016 UTC projs/trunk/shared_source/c_tcl_base_7_5_w_mods/regcustom.h revision 71 by dashley, Sat Nov 5 11:07:06 2016 UTC
# Line 1  Line 1 
 /* $Header: /cvsroot/esrg/sfesrg/esrgpcpj/shared/tcl_base/regcustom.h,v 1.1.1.1 2001/06/13 04:31:35 dtashley Exp $ */  
   
 /*  
  * Copyright (c) 1998, 1999 Henry Spencer.  All rights reserved.  
  *  
  * Development of this software was funded, in part, by Cray Research Inc.,  
  * UUNET Communications Services Inc., Sun Microsystems Inc., and Scriptics  
  * Corporation, none of whom are responsible for the results.  The author  
  * thanks all of them.  
  *  
  * Redistribution and use in source and binary forms -- with or without  
  * modification -- are permitted for any purpose, provided that  
  * redistributions in source form retain this entire copyright notice and  
  * indicate the origin and nature of any modifications.  
  *  
  * I'd appreciate being given credit for this package in the documentation  
  * of software which uses it, but that is not a requirement.  
  *  
  * THIS SOFTWARE IS PROVIDED ``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  
  * HENRY SPENCER 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.  
  */  
   
 /* headers if any */  
 #include "tclInt.h"  
   
 /* overrides for regguts.h definitions, if any */  
 #define FUNCPTR(name, args)     (*name) _ANSI_ARGS_(args)  
 #define MALLOC(n)               ckalloc(n)  
 #define FREE(p)                 ckfree(VS(p))  
 #define REALLOC(p,n)            ckrealloc(VS(p),n)  
   
   
   
 /*  
  * Do not insert extras between the "begin" and "end" lines -- this  
  * chunk is automatically extracted to be fitted into regex.h.  
  */  
 /* --- begin --- */  
 /* ensure certain things don't sneak in from system headers */  
 #ifdef __REG_WIDE_T  
 #undef __REG_WIDE_T  
 #endif  
 #ifdef __REG_WIDE_COMPILE  
 #undef __REG_WIDE_COMPILE  
 #endif  
 #ifdef __REG_WIDE_EXEC  
 #undef __REG_WIDE_EXEC  
 #endif  
 #ifdef __REG_REGOFF_T  
 #undef __REG_REGOFF_T  
 #endif  
 #ifdef __REG_VOID_T  
 #undef __REG_VOID_T  
 #endif  
 #ifdef __REG_CONST  
 #undef __REG_CONST  
 #endif  
 #ifdef __REG_NOFRONT  
 #undef __REG_NOFRONT  
 #endif  
 #ifdef __REG_NOCHAR  
 #undef __REG_NOCHAR  
 #endif  
 /* interface types */  
 #define __REG_WIDE_T    Tcl_UniChar  
 #define __REG_REGOFF_T  long    /* not really right, but good enough... */  
 #define __REG_VOID_T    VOID  
 #define __REG_CONST     CONST  
 /* names and declarations */  
 #define __REG_WIDE_COMPILE      TclReComp  
 #define __REG_WIDE_EXEC         TclReExec  
 #define __REG_NOFRONT           /* don't want regcomp() and regexec() */  
 #define __REG_NOCHAR            /* or the char versions */  
 #define regfree         TclReFree  
 #define regerror        TclReError  
 /* --- end --- */  
   
   
   
 /* internal character type and related */  
 typedef Tcl_UniChar chr;        /* the type itself */  
 typedef int pchr;               /* what it promotes to */  
 typedef unsigned uchr;          /* unsigned type that will hold a chr */  
 typedef int celt;               /* type to hold chr, MCCE number, or NOCELT */  
 #define NOCELT  (-1)            /* celt value which is not valid chr or MCCE */  
 #define CHR(c)  (UCHAR(c))      /* turn char literal into chr literal */  
 #define DIGITVAL(c)     ((c)-'0')       /* turn chr digit into its value */  
 #define CHRBITS 16              /* bits in a chr; must not use sizeof */  
 #define CHR_MIN 0x0000          /* smallest and largest chr; the value */  
 #define CHR_MAX 0xffff          /*  CHR_MAX-CHR_MIN+1 should fit in uchr */  
   
 /* functions operating on chr */  
 #define iscalnum(x)     Tcl_UniCharIsAlnum(x)  
 #define iscalpha(x)     Tcl_UniCharIsAlpha(x)  
 #define iscdigit(x)     Tcl_UniCharIsDigit(x)  
 #define iscspace(x)     Tcl_UniCharIsSpace(x)  
   
 /* name the external functions */  
 #define compile         TclReComp  
 #define exec            TclReExec  
   
 /* enable/disable debugging code (by whether REG_DEBUG is defined or not) */  
 #if 0           /* no debug unless requested by makefile */  
 #define REG_DEBUG       /* */  
 #endif  
   
 /* and pick up the standard header */  
 #include "regex.h"  
   
 /* $History: regcustom.h $  
  *  
  * *****************  Version 1  *****************  
  * User: Dtashley     Date: 1/02/01    Time: 12:08a  
  * Created in $/IjuScripter, IjuConsole/Source/Tcl Base  
  * Initial check-in.  
  */  
   
 /* End of REGCUSTOM.H */  
1    /* $Header$ */
2    /*
3     * Copyright (c) 1998, 1999 Henry Spencer.  All rights reserved.
4     *
5     * Development of this software was funded, in part, by Cray Research Inc.,
6     * UUNET Communications Services Inc., Sun Microsystems Inc., and Scriptics
7     * Corporation, none of whom are responsible for the results.  The author
8     * thanks all of them.
9     *
10     * Redistribution and use in source and binary forms -- with or without
11     * modification -- are permitted for any purpose, provided that
12     * redistributions in source form retain this entire copyright notice and
13     * indicate the origin and nature of any modifications.
14     *
15     * I'd appreciate being given credit for this package in the documentation
16     * of software which uses it, but that is not a requirement.
17     *
18     * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
19     * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
20     * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
21     * HENRY SPENCER BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
22     * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
23     * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
24     * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
25     * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
26     * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
27     * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28     */
29    
30    /* headers if any */
31    #include "tclInt.h"
32    
33    /* overrides for regguts.h definitions, if any */
34    #define FUNCPTR(name, args)     (*name) _ANSI_ARGS_(args)
35    #define MALLOC(n)               ckalloc(n)
36    #define FREE(p)                 ckfree(VS(p))
37    #define REALLOC(p,n)            ckrealloc(VS(p),n)
38    
39    
40    
41    /*
42     * Do not insert extras between the "begin" and "end" lines -- this
43     * chunk is automatically extracted to be fitted into regex.h.
44     */
45    /* --- begin --- */
46    /* ensure certain things don't sneak in from system headers */
47    #ifdef __REG_WIDE_T
48    #undef __REG_WIDE_T
49    #endif
50    #ifdef __REG_WIDE_COMPILE
51    #undef __REG_WIDE_COMPILE
52    #endif
53    #ifdef __REG_WIDE_EXEC
54    #undef __REG_WIDE_EXEC
55    #endif
56    #ifdef __REG_REGOFF_T
57    #undef __REG_REGOFF_T
58    #endif
59    #ifdef __REG_VOID_T
60    #undef __REG_VOID_T
61    #endif
62    #ifdef __REG_CONST
63    #undef __REG_CONST
64    #endif
65    #ifdef __REG_NOFRONT
66    #undef __REG_NOFRONT
67    #endif
68    #ifdef __REG_NOCHAR
69    #undef __REG_NOCHAR
70    #endif
71    /* interface types */
72    #define __REG_WIDE_T    Tcl_UniChar
73    #define __REG_REGOFF_T  long    /* not really right, but good enough... */
74    #define __REG_VOID_T    VOID
75    #define __REG_CONST     CONST
76    /* names and declarations */
77    #define __REG_WIDE_COMPILE      TclReComp
78    #define __REG_WIDE_EXEC         TclReExec
79    #define __REG_NOFRONT           /* don't want regcomp() and regexec() */
80    #define __REG_NOCHAR            /* or the char versions */
81    #define regfree         TclReFree
82    #define regerror        TclReError
83    /* --- end --- */
84    
85    
86    
87    /* internal character type and related */
88    typedef Tcl_UniChar chr;        /* the type itself */
89    typedef int pchr;               /* what it promotes to */
90    typedef unsigned uchr;          /* unsigned type that will hold a chr */
91    typedef int celt;               /* type to hold chr, MCCE number, or NOCELT */
92    #define NOCELT  (-1)            /* celt value which is not valid chr or MCCE */
93    #define CHR(c)  (UCHAR(c))      /* turn char literal into chr literal */
94    #define DIGITVAL(c)     ((c)-'0')       /* turn chr digit into its value */
95    #define CHRBITS 16              /* bits in a chr; must not use sizeof */
96    #define CHR_MIN 0x0000          /* smallest and largest chr; the value */
97    #define CHR_MAX 0xffff          /*  CHR_MAX-CHR_MIN+1 should fit in uchr */
98    
99    /* functions operating on chr */
100    #define iscalnum(x)     Tcl_UniCharIsAlnum(x)
101    #define iscalpha(x)     Tcl_UniCharIsAlpha(x)
102    #define iscdigit(x)     Tcl_UniCharIsDigit(x)
103    #define iscspace(x)     Tcl_UniCharIsSpace(x)
104    
105    /* name the external functions */
106    #define compile         TclReComp
107    #define exec            TclReExec
108    
109    /* enable/disable debugging code (by whether REG_DEBUG is defined or not) */
110    #if 0           /* no debug unless requested by makefile */
111    #define REG_DEBUG       /* */
112    #endif
113    
114    /* and pick up the standard header */
115    #include "regex.h"
116    
117    /* End of regcustom.h */
Legend:
Removed from v.42  
changed lines
  Added in v.71
dashley@gmail.com
 ViewVC Help
Powered by ViewVC 1.1.25