2.11BSD#431 - /usr/src/new/PORT/perl.1.0.0/str.h

   1: /* $Header: str.h,v 1.0 87/12/18 13:06:26 root Exp $
   2:  *
   3:  * $Log:	str.h,v $
   4:  * Revision 1.0  87/12/18  13:06:26  root
   5:  * Initial revision
   6:  *
   7:  */
   8: 
   9: struct string {
  10:     char *  str_ptr;    /* pointer to malloced string */
  11:     double  str_nval;   /* numeric value, if any */
  12:     int     str_len;    /* allocated size */
  13:     int     str_cur;    /* length of str_ptr as a C string */
  14:     union {
  15:     STR *str_next;      /* while free, link to next free str */
  16:     STAB *str_magic;    /* while in use, ptr to magic stab, if any */
  17:     } str_link;
  18:     char    str_pok;    /* state of str_ptr */
  19:     char    str_nok;    /* state of str_nval */
  20: };
  21: 
  22: #define Nullstr Null(STR*)
  23: 
  24: /* the following macro updates any magic values this str is associated with */
  25: 
  26: #define STABSET(x) (x->str_link.str_magic && stabset(x->str_link.str_magic,x))
  27: 
  28: EXT STR **tmps_list;
  29: EXT long tmps_max INIT(-1);
  30: 
  31: char *str_2ptr();
  32: double str_2num();
  33: STR *str_static();
  34: STR *str_make();
  35: STR *str_nmake();

Defined variables

Defined struct's

Defined macros

Usage of this include