aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/intrinsics/gerror.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/intrinsics/gerror.c')
-rw-r--r--libgfortran/intrinsics/gerror.c6
1 files changed, 1 insertions, 5 deletions
diff --git a/libgfortran/intrinsics/gerror.c b/libgfortran/intrinsics/gerror.c
index 0ec354a0bac..68ad7fe7a42 100644
--- a/libgfortran/intrinsics/gerror.c
+++ b/libgfortran/intrinsics/gerror.c
@@ -1,5 +1,5 @@
/* Implementation of the GERROR g77 intrinsic.
- Copyright (C) 2005 Free Software Foundation, Inc.
+ Copyright (C) 2005, 2007 Free Software Foundation, Inc.
Contributed by François-Xavier Coudert <coudert@clipper.ens.fr>
This file is part of the GNU Fortran 95 runtime library (libgfortran).
@@ -28,14 +28,10 @@ License along with libgfortran; see the file COPYING. If not,
write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Boston, MA 02110-1301, USA. */
-#include "config.h"
#include "libgfortran.h"
#include <errno.h>
-
-#ifdef HAVE_STRING_H
#include <string.h>
-#endif
/* GERROR (MESSAGE), g77 intrinsic for retrieving the system error