home *** CD-ROM | disk | FTP | other *** search
- /* $Header: util.h,v 3.0.1.2 89/11/17 15:48:01 lwall Locked $
- *
- * Copyright (c) 1989, 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.
- *
- * $Log: util.h,v $
- * Revision 3.0.1.2 89/11/17 15:48:01 lwall
- * patch5: BZERO separate from BCOPY now
- *
- * Revision 3.0.1.1 89/10/26 23:28:25 lwall
- * patch1: declared bcopy if necessary
- *
- * Revision 3.0 89/10/18 15:33:18 lwall
- * 3.0 baseline
- *
- */
-
- EXT int *screamfirst INIT(Null(int*));
- EXT int *screamnext INIT(Null(int*));
-
- extern char *safemalloc PROTO((MEM_SIZE));
- extern char *saferealloc PROTO((char *, MEM_SIZE));
- extern char *cpytill PROTO((char *, char *, char *, int, int *));
- extern char *instr PROTO((char *, char *));
- extern char *fbminstr PROTO((unsigned char *, unsigned char *, STR *));
- extern char *screaminstr PROTO((STR *, STR *));
- extern void fbmcompile PROTO((STR *, int));
- extern char *savestr PROTO((char *));
- extern void setenv PROTO((char *, char *));
- extern int envix PROTO((char *));
- extern void growstr PROTO((char **, int *, int));
- extern char *ninstr PROTO((char *, char *, char *, char *));
- extern char *rninstr PROTO((char *, char *, char *, char *));
- extern char *nsavestr PROTO((char *, int));
- extern FILE *mypopen PROTO((char *, char *));
- extern int mypclose PROTO((FILE *));
- extern void fatal PROTO((char *, ...));
- extern void warn PROTO((char *, ...));
- extern void pidgone PROTO((int, int));
-
- #ifndef MEMCPY
- #ifndef BCOPY
- extern char *bcopy PROTO((char *, char *, int));
- #endif
- #ifndef BZERO
- extern char *bzero PROTO((char *, int));
- #endif
- #endif
-