diff options
| author | Larry Wall <lwall@netlabs.com> | 1991-04-11 20:32:32 +0000 |
|---|---|---|
| committer | Larry Wall <lwall@netlabs.com> | 1991-04-11 20:32:32 +0000 |
| commit | 35c8bce761056f470189967ccc824e04467151df (patch) | |
| tree | 9ee76bba81900f86af5a1070bdd69d3987201c52 /perl.h | |
| parent | 1c3d792e8fc9c2a36edfbd6c01156ef7e635040f (diff) | |
| download | perl-35c8bce761056f470189967ccc824e04467151df.tar.gz | |
perl 4.0 patch 2: Patch 1 continued
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 13 |
1 files changed, 10 insertions, 3 deletions
@@ -1,4 +1,4 @@ -/* $Header: perl.h,v 4.0 91/03/20 01:37:56 lwall Locked $ +/* $RCSfile: perl.h,v $$Revision: 4.0.1.1 $$Date: 91/04/11 17:49:51 $ * * Copyright (c) 1989, Larry Wall * @@ -6,12 +6,15 @@ * as specified in the README file that comes with the perl 3.0 kit. * * $Log: perl.h,v $ + * Revision 4.0.1.1 91/04/11 17:49:51 lwall + * patch1: hopefully straightened out some of the Xenix mess + * * Revision 4.0 91/03/20 01:37:56 lwall * 4.0 baseline. * */ -#define VOIDUSED 1 +#define VOIDWANT 1 #include "config.h" #ifdef MSDOS @@ -148,6 +151,7 @@ extern int errno; /* ANSI allows errno to be an lvalue expr */ #endif #endif +#ifndef strerror #ifdef HAS_STRERROR char *strerror(); #else @@ -155,6 +159,7 @@ extern int sys_nerr; extern char *sys_errlist[]; #define strerror(e) ((e) < 0 || (e) >= sys_nerr ? "(unknown)" : sys_errlist[e]) #endif +#endif #ifdef I_SYSIOCTL #ifndef _IOCTL_ @@ -221,7 +226,7 @@ EXT int dbmlen; #define ntohi ntohl #endif -#if defined(I_DIRENT) && !defined(M_XENIX) +#if defined(I_DIRENT) # include <dirent.h> # define DIRENT dirent #else @@ -592,6 +597,8 @@ ARRAY *saveary(); EXT char **origargv; EXT int origargc; EXT char **origenviron; +extern char **environ; + EXT line_t subline INIT(0); EXT STR *subname INIT(Nullstr); EXT int arybase INIT(0); |