From: Gurusamy Sarathy Date: Sat, 19 Feb 2000 17:32:03 +0000 (+0000) Subject: avoid compiler warnings X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fe52b3b7bda653f279f0cacf2b55156e66a0d71d;p=p5sagit%2Fp5-mst-13.2.git avoid compiler warnings p4raw-id: //depot/perl@5149 --- diff --git a/malloc.c b/malloc.c index 0e5e26f..c4a7a90 100644 --- a/malloc.c +++ b/malloc.c @@ -1867,6 +1867,7 @@ Perl_get_mstats(pTHX_ perl_mstats_t *buf, int buflen, int level) } } #endif /* defined DEBUGGING_MSTATS */ + return 0; /* XXX unused */ } /* * mstats - print out statistics about malloc diff --git a/perl.h b/perl.h index cb3e6eb..66162e6 100644 --- a/perl.h +++ b/perl.h @@ -3170,20 +3170,19 @@ typedef struct am_table_short AMTS; #ifdef I_FCNTL # include -#else -# ifndef O_RDONLY -/* Assume UNIX defaults */ -# define O_RDONLY 0000 -# define O_WRONLY 0001 -# define O_RDWR 0002 -# define O_CREAT 0100 -# endif #endif #ifdef I_SYS_FILE # include #endif +#ifndef O_RDONLY +/* Assume UNIX defaults */ +# define O_RDONLY 0000 +# define O_WRONLY 0001 +# define O_RDWR 0002 +# define O_CREAT 0100 +#endif #ifdef IAMSUID