summaryrefslogtreecommitdiff
path: root/libgfortran/intrinsics/unlink.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/intrinsics/unlink.c')
-rw-r--r--libgfortran/intrinsics/unlink.c11
1 files changed, 4 insertions, 7 deletions
diff --git a/libgfortran/intrinsics/unlink.c b/libgfortran/intrinsics/unlink.c
index 2f7a5ca8b49..cf95529acee 100644
--- a/libgfortran/intrinsics/unlink.c
+++ b/libgfortran/intrinsics/unlink.c
@@ -1,5 +1,5 @@
/* Implementation of the UNLINK intrinsic.
- Copyright (C) 2004, 2005 Free Software Foundation, Inc.
+ Copyright (C) 2004, 2005, 2007 Free Software Foundation, Inc.
Contributed by Steven G. Kargl <kargls@comcast.net>.
This file is part of the GNU Fortran 95 runtime library (libgfortran).
@@ -28,17 +28,14 @@ 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 <string.h>
+#include <errno.h>
+
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#endif
-#ifdef HAVE_STRING_H
-#include <string.h>
-#endif
-
-#include <errno.h>
/* SUBROUTINE UNLINK(NAME, STATUS)
CHARACTER(LEN= ), INTENT(IN) :: NAME