source: vendor/perl/5.8.8/x2p/util.h

Last change on this file was 3181, checked in by bird, 18 years ago

perl 5.8.8

File size: 944 bytes
Line 
1/* util.h
2 *
3 * Copyright (C) 1991, 1992, 1993, 1994, 1995, 1996, 1999, 2000, 2005
4 * by Larry Wall and others
5 *
6 * You may distribute under the terms of either the GNU General Public
7 * License or the Artistic License, as specified in the README file.
8 */
9
10/* is the string for makedir a directory name or a filename? */
11
12#define fatal Myfatal
13
14#define MD_DIR 0
15#define MD_FILE 1
16
17#ifdef SETUIDGID
18 int eaccess();
19#endif
20
21char * cpy2 ( char *to, char *from, int delim );
22char * cpytill ( char *to, char *from, int delim );
23void growstr ( char **strptr, int *curlen, int newlen );
24char * instr ( char *big, char *little );
25char * savestr ( char *str );
26void fatal ( const char *pat, ... );
27void warn ( const char *pat, ... );
28int prewalk ( int numit, int level, int node, int *numericptr );
29
30Malloc_t safemalloc (MEM_SIZE nbytes);
31Malloc_t saferealloc (Malloc_t where, MEM_SIZE nbytes);
32Free_t safefree (Malloc_t where);
Note: See TracBrowser for help on using the repository browser.