Reinstate part of #28744 that was accidentally reverted in #30454

[perl5.git] / x2p / str.h

diff --git a/x2p/str.h b/x2p/str.h
index ab3f885..f5b590b 100644 (file)
--- 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 {
@@ -29,9 +28,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, char *ptr );
+void str_free ( STR *str );
+char * str_gets ( STR *str, FILE *fp );
+int str_len ( STR *str );
+STR * str_make ( char *s );
+void str_ncat ( STR *str, char *ptr, int len );
+STR * str_new ( int len );
+void str_nset ( STR *str, char *ptr, int len );
+void str_numset ( STR *str, double num );
+void str_scat ( STR *dstr, STR *sstr );
+void str_set ( STR *str, char *ptr );
+void str_sset ( STR *dstr, STR *sstr );