From 0b20f4a6caec75a05801b8d84a1d7841efdcedfc Mon Sep 17 00:00:00 2001
From: Uros Bizjak <ubizjak@gmail.com>
Date: Fri, 30 Mar 2012 13:07:46 +0200
Subject: [PATCH] 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
---
 libgfortran/ChangeLog          | 5 +++++
 libgfortran/intrinsics/chmod.c | 1 -
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 7890287c3e5f..8f6afc05b54b 100644
--- 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 01db8beb9e08..91563033f136 100644
--- 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++)
-- 
GitLab