perl5.000 patch.0e: fix various non-broken things in the x2p/ directory
[p5sagit/p5-mst-13.2.git] / x2p / util.h
1 /* $RCSfile: util.h,v $$Revision: 4.1 $$Date: 92/08/07 18:29:30 $
2  *
3  *    Copyright (c) 1991, Larry Wall
4  *
5  *    You may distribute under the terms of either the GNU General Public
6  *    License or the Artistic License, as specified in the README file.
7  *
8  * $Log:        util.h,v $
9  */
10
11 /* is the string for makedir a directory name or a filename? */
12
13 #define fatal Myfatal
14
15 #define MD_DIR 0
16 #define MD_FILE 1
17
18 #ifdef SETUIDGID
19     int         eaccess();
20 #endif
21
22 char    *getwd();
23 int     makedir();
24
25 char * cpy2 _(( char *to, char *from, int delim ));
26 char * cpytill _(( char *to, char *from, int delim ));
27 int croak _(( char *pat, int a1, int a2, int a3, int a4 ));
28 int envix _(( char *nam ));
29 void growstr _(( char **strptr, int *curlen, int newlen ));
30 char * instr _(( char *big, char *little ));
31 int Myfatal ();
32 char * safecpy _(( char *to, char *from, int len ));
33 char * savestr _(( char *str ));
34 void setenv _(( char *nam, char *val ));
35 void warn ();