From 226f8242c0e8898a8e86d8c280f026d8bb0223bb Mon Sep 17 00:00:00 2001 From: Toon Moene Date: Sun, 10 Jun 2001 19:57:29 +0200 Subject: [PATCH] 20010610.f: New. 2001-06-10 Toon Moene * g77.f-torture/execute/20010610.f: New. From-SVN: r43143 --- gcc/testsuite/ChangeLog | 4 ++++ gcc/testsuite/g77.f-torture/execute/20010610.f | 4 ++++ 2 files changed, 8 insertions(+) create mode 100644 gcc/testsuite/g77.f-torture/execute/20010610.f diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 1a0a6d9d760..acfa9fc8365 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2001-06-10 Toon Moene + + * g77.f-torture/execute/20010610.f: New. + 2001-06-09 David Billinghurst * 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 00000000000..4ce2d22147a --- /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 -- 2.30.2