This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |
Other format: | [Raw text] |
This patch fixes: /cvs/gcc/libgfortran/intrinsics/abort.c: In function `_gfortran_abort': /cvs/gcc/libgfortran/intrinsics/abort.c:29: warning: implicit declaration of function 'abort' /cvs/gcc/libgfortran/intrinsics/random.c: In function `_gfortran_random_seed': /cvs/gcc/libgfortran/intrinsics/random.c:95: warning: implicit declaration of function 'read' /cvs/gcc/libgfortran/intrinsics/random.c:96: warning: implicit declaration of function 'close' Bootstrapped/Regtested on Linux/AMD64. Ok to commit? Andreas 2004-05-30 Andreas Jaeger <aj@suse.de> * intrinsics/random.c: Include unistd.h for close and read prototypes, remove unneeded inclusion of assert.h. * intrinsics/abort.c: Include stdlib.h for abort prototype, remove unneeded inclusion of assert.h. ============================================================ Index: intrinsics/random.c --- intrinsics/random.c 23 May 2004 16:18:22 -0000 1.4 +++ intrinsics/random.c 29 May 2004 22:38:49 -0000 @@ -1,5 +1,5 @@ /* Implementation of the RANDOM intrinsics - Copyright 2002 Free Software Foundation, Inc. + Copyright 2002, 2004 Free Software Foundation, Inc. Contributed by Lars Segerlund <seger@linuxmail.org> The algorithm was taken from the paper : @@ -37,7 +37,11 @@ Boston, MA 02111-1307, USA. */ #include <sys/types.h> #include <sys/stat.h> #include <fcntl.h> -#include <assert.h> + +#ifdef HAVE_UNISTD_H +#include <unistd.h> +#endif + #include "libgfortran.h" /*Use the 'big' generator by default ( period -> 2**19937 ). */ ============================================================ Index: intrinsics/abort.c --- intrinsics/abort.c 13 May 2004 06:41:02 -0000 1.2 +++ intrinsics/abort.c 29 May 2004 22:38:49 -0000 @@ -1,5 +1,5 @@ /* Implementation of the ABORT intrinsic. - Copyright (C) 2003 Free Software Foundation, Inc. + Copyright (C) 2003, 2004 Free Software Foundation, Inc. This file is part of the GNU Fortran 95 runtime library (libgfortran). @@ -19,7 +19,7 @@ write to the Free Software Foundation, I Boston, MA 02111-1307, USA. */ #include "libgfortran.h" -#include <assert.h> +#include <stdlib.h> void prefix(abort) (void); -- Andreas Jaeger, aj@suse.de, http://www.suse.de/~aj SUSE Linux AG, Maxfeldstr. 5, 90409 Nürnberg, Germany GPG fingerprint = 93A3 365E CE47 B889 DF7F FED1 389A 563C C272 A126
Attachment:
pgp00000.pgp
Description: PGP signature
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |