X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=util.h;h=7dcf9ceab51c487d928381fc0b18bdf02729c767;hb=0a5d5e8be390bda2f9b7684490082d428228d28f;hp=3b077ab356ce2415df7c19fcb09c143871daf71b;hpb=fe14fcc35f78a371a174a1d14256c2f35ae4262b;p=p5sagit%2Fp5-mst-13.2.git diff --git a/util.h b/util.h index 3b077ab..7dcf9ce 100644 --- a/util.h +++ b/util.h @@ -1,42 +1,8 @@ -/* $Header: util.h,v 4.0 91/03/20 01:56:48 lwall Locked $ +/* util.h * - * Copyright (c) 1989, Larry Wall + * Copyright (c) 1991-1997, Larry Wall * - * You may distribute under the terms of the GNU General Public License - * as specified in the README file that comes with the perl 3.0 kit. + * You may distribute under the terms of either the GNU General Public + * License or the Artistic License, as specified in the README file. * - * $Log: util.h,v $ - * Revision 4.0 91/03/20 01:56:48 lwall - * 4.0 baseline. - * */ - -EXT int *screamfirst INIT(Null(int*)); -EXT int *screamnext INIT(Null(int*)); - -char *safemalloc(); -char *saferealloc(); -char *cpytill(); -char *instr(); -char *fbminstr(); -char *screaminstr(); -void fbmcompile(); -char *savestr(); -void setenv(); -int envix(); -void growstr(); -char *ninstr(); -char *rninstr(); -char *nsavestr(); -FILE *mypopen(); -int mypclose(); -#ifndef HAS_MEMCPY -#ifndef HAS_BCOPY -char *bcopy(); -#endif -#ifndef HAS_BZERO -char *bzero(); -#endif -#endif -unsigned long scanoct(); -unsigned long scanhex();