source: trunk/essentials/dev-lang/perl/x2p/str.h@ 3222

Last change on this file since 3222 was 3181, checked in by bird, 19 years ago

perl 5.8.8

File size: 1.3 KB
Line 
1/* str.h
2 *
3 * Copyright (C) 1991, 1992, 1993, 1994, 1995, 1999, 2000, 2005
4 * by Larry Wall and others
5 *
6 * You may distribute under the terms of either the GNU General Public
7 * License or the Artistic License, as specified in the README file.
8 */
9
10struct string {
11 char * str_ptr; /* pointer to malloced string */
12 double str_nval; /* numeric value, if any */
13 int str_len; /* allocated size */
14 int str_cur; /* length of str_ptr as a C string */
15 union {
16 STR *str_next; /* while free, link to next free str */