2.11BSD#431 - /usr/src/new/PORT/perl.1.0.10/spat.h

   1: /* $Header: spat.h,v 1.0 87/12/18 13:06:10 root Exp $
   2:  *
   3:  * $Log:	spat.h,v $
   4:  * Revision 1.0  87/12/18  13:06:10  root
   5:  * Initial revision
   6:  *
   7:  */
   8: 
   9: struct scanpat {
  10:     SPAT    *spat_next;     /* list of all scanpats */
  11:     COMPEX  spat_compex;        /* compiled expression */
  12:     ARG     *spat_repl;     /* replacement string for subst */
  13:     ARG     *spat_runtime;      /* compile pattern at runtime */
  14:     STR     *spat_first;        /* for a fast bypass of execute() */
  15:     bool    spat_flags;
  16:     char    spat_flen;
  17: };
  18: 
  19: #define SPAT_USED 1         /* spat has been used once already */
  20: #define SPAT_USE_ONCE 2         /* use pattern only once per article */
  21: #define SPAT_SCANFIRST 4        /* initial constant not anchored */
  22: #define SPAT_SCANALL 8          /* initial constant is whole pat */
  23: 
  24: EXT SPAT *spat_root;        /* list of all spats */
  25: EXT SPAT *curspat;      /* what to do \ interps from */
  26: 
  27: #define Nullspat Null(SPAT*)

Defined struct's

Defined macros

Usage of this include