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
string
defined in line
9; used 2 times
Defined macros
Nullstr
defined in line
22; used 33 times
- in /usr/src/new/PORT/perl.1.0.16/arg.c line
93,
147,
283-284(2),
582-583(2),
615-616(2),
655-656(2),
1061-1062(2),
1076,
1082,
1088-1089(2),
1096-1097(2),
1795,
2088,
2151-2152(2)
- in /usr/src/new/PORT/perl.1.0.16/array.c line
22,
47,
63,
110-112(2),
141-145(2)
- in /usr/src/new/PORT/perl.1.0.16/hash.c line
27,
41
- in /usr/src/new/PORT/perl.1.0.16/perl.h line
157,
163
STABSET
defined in line
26; used 33 times
- in /usr/src/new/PORT/perl.1.0.16/arg.c line
172,
204,
309,
407,
735,
1014,
1029,
1333,
1343,
1445-1455(3),
1461,
1475-1483(3),
1499,
1586,
1596,
1636,
1647,
1659,
1667,
1676,
1689-1694(2),
1839,
1893,
1903,
2126,
2138
- in /usr/src/new/PORT/perl.1.0.16/array.c line
168,
181
Usage of this include