X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/a0d0e21ea6ea90a22318550944fe6cb09ae10cda..6a8dbfd7fdd5687ed748747ea8902c967c879870:/x2p/str.h diff --git a/x2p/str.h b/x2p/str.h index ab3f885..7fc8e1e 100644 --- a/x2p/str.h +++ b/x2p/str.h @@ -1,11 +1,10 @@ -/* $RCSfile: str.h,v $$Revision: 4.1 $$Date: 92/08/07 18:29:27 $ +/* str.h * - * Copyright (c) 1991, Larry Wall + * Copyright (C) 1991, 1992, 1993, 1994, 1995, 1999, 2000, 2005 + * by Larry Wall and others * * 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 { @@ -20,8 +19,6 @@ struct string { 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)) @@ -29,9 +26,16 @@ struct string { EXT STR **tmps_list; EXT long tmps_max INIT(-1); -char *str_2ptr(); -double str_2num(); -STR *str_mortal(); -STR *str_make(); -STR *str_nmake(); -char *str_gets(); +char * str_2ptr ( STR *str ); +void str_cat ( STR *str, const char *ptr ); +void str_free ( STR *str ); +char * str_gets ( STR *str, FILE *fp ); +int str_len ( STR *str ); +STR * str_make ( const char *s ); +void str_ncat ( STR *str, const char *ptr, int len ); +STR * str_new ( int len ); +void str_nset ( STR *str, const char *ptr, int len ); +void str_numset ( STR *str, double num ); +void str_scat ( STR *dstr, STR *sstr ); +void str_set ( STR *str, const char *ptr ); +void str_sset ( STR *dstr, STR *sstr );