diff options
Diffstat (limited to 'contrib/perl5/x2p/str.h')
-rw-r--r-- | contrib/perl5/x2p/str.h | 53 |
1 files changed, 0 insertions, 53 deletions
diff --git a/contrib/perl5/x2p/str.h b/contrib/perl5/x2p/str.h deleted file mode 100644 index 311c5e6..0000000 --- a/contrib/perl5/x2p/str.h +++ /dev/null @@ -1,53 +0,0 @@ -/* $RCSfile: str.h,v $$Revision: 4.1 $$Date: 92/08/07 18:29:27 $ - * - * Copyright (c) 1991-2001, Larry Wall - * - * You may distribute under the terms of either the GNU General Public - * License or the Artistic License, as specified in the README file. - * - * $Log: str.h,v $ - */ - -struct string { - char * str_ptr; /* pointer to malloced string */ - double str_nval; /* numeric value, if any */ - int str_len; /* allocated size */ - int str_cur; /* length of str_ptr as a C string */ - union { - STR *str_next; /* while free, link to next free str */ - } str_link; - char str_pok; /* state of str_ptr */ - char str_nok; /* state of str_nval */ -}; - -#define Nullstr Null(STR*) - -/* the following macro updates any magic values this str is associated with */ - -#define STABSET(x) (x->str_link.str_magic && stabset(x->str_link.str_magic,x)) - -EXT STR **tmps_list; -EXT long tmps_max INIT(-1); - -double str_2num ( STR *str ); -char * str_2ptr ( STR *str ); -char * str_append_till ( STR *str, char *from, int delim, char *keeplist ); -void str_cat ( STR *str, char *ptr ); -void str_chop ( STR *str, char *ptr ); -void str_dec ( STR *str ); -void str_free ( STR *str ); -char * str_gets ( STR *str, FILE *fp ); -void str_grow ( STR *str, int len ); -void str_inc ( STR *str ); -int str_len ( STR *str ); -STR * str_make ( char *s ); -STR * str_mortal ( STR *oldstr ); -void str_ncat ( STR *str, char *ptr, int len ); -STR * str_new ( int len ); -STR * str_nmake ( double n ); -void str_nset ( STR *str, char *ptr, int len ); -void str_numset ( STR *str, double num ); -void str_replace ( STR *str, STR *nstr ); -void str_scat ( STR *dstr, STR *sstr ); -void str_set ( STR *str, char *ptr ); -void str_sset ( STR *dstr, STR *sstr ); |