re PR libfortran/52758 (libgfortran/intrinsics/chmod.c: Array index out of bounds)

	PR libgfortran/52758
	* intrinsics/chmod.c: Remove out-of-bound initialization of rwxXstugo.

From-SVN: r186008

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 7890287c3e5fb8c35cd719d6307a6cb3f2ec1d8b..8f6afc05b54bc1718b52bb99639f0457ae81e174 100644 (file)
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,8 @@
+2012-03-30  Uros Bizjak  <ubizjak@gmail.com>
+
+       PR libgfortran/52758
+       * intrinsics/chmod.c: Remove out-of-bound initialization of rwxXstugo.
+
 2012-03-27  Tristan Gingold  <gingold@adacore.com>
 
        * configure.ac: Add description to AC_DEFINE in

diff --git a/libgfortran/intrinsics/chmod.c b/libgfortran/intrinsics/chmod.c
index 01db8beb9e0823d7b6528fa6fed0fa5dd926ec06..91563033f1362ea61bdf832c2e638d8dc016f3a2 100644 (file)
--- a/libgfortran/intrinsics/chmod.c
+++ b/libgfortran/intrinsics/chmod.c
@@ -141,7 +141,6 @@ chmod_func (char *name, char *mode, gfc_charlen_type name_len,
       rwxXstugo[6] = false;
       rwxXstugo[7] = false;
       rwxXstugo[8] = false;
-      rwxXstugo[9] = false;
       part = 0;
       set_mode = -1;
       for (; i < mode_len; i++)