aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc')
-rw-r--r--gcc/testsuite/ChangeLog4
-rw-r--r--gcc/testsuite/g77.f-torture/execute/20010610.f4
2 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 1a0a6d9..acfa9fc 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2001-06-10 Toon Moene <toon@moene.indiv.nluug.nl>
+
+ * g77.f-torture/execute/20010610.f: New.
+
2001-06-09 David Billinghurst <David.Billinghurst@riotinto.com>
* g++.dg/mangle1.C: Change regex to allow USER_LABEL_PREFIX == "_"
diff --git a/gcc/testsuite/g77.f-torture/execute/20010610.f b/gcc/testsuite/g77.f-torture/execute/20010610.f
new file mode 100644
index 0000000..4ce2d22
--- /dev/null
+++ b/gcc/testsuite/g77.f-torture/execute/20010610.f
@@ -0,0 +1,4 @@
+ DO I = 0, 255
+ IF (ICHAR(CHAR(I)) .NE. I) CALL ABORT
+ ENDDO
+ END