aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/g77.f-torture
diff options
context:
space:
mode:
authorToon Moene <toon@moene.indiv.nluug.nl>2001-01-15 16:48:35 +0000
committerToon Moene <toon@moene.indiv.nluug.nl>2001-01-15 16:48:35 +0000
commita6248804a4cdc506990e911690592c8580363f5a (patch)
treea21da933197f0eedd9ab143ac0b91642bfa50e9e /gcc/testsuite/g77.f-torture
parent6554a4c5bf3d51067757264fade309ea55a64b6d (diff)
2001-01-15 Toon Moene <toon@moene.indiv.nluug.nl>
* g77.f-torture/compile/20010115.f: New test. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@39041 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/g77.f-torture')
-rw-r--r--gcc/testsuite/g77.f-torture/compile/20010115.f8
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/g77.f-torture/compile/20010115.f b/gcc/testsuite/g77.f-torture/compile/20010115.f
new file mode 100644
index 00000000000..71e8c6948b9
--- /dev/null
+++ b/gcc/testsuite/g77.f-torture/compile/20010115.f
@@ -0,0 +1,8 @@
+ PRINT 42, 'HELLO'
+ 42 FORMAT(A)
+ CALL WORLD
+ END
+ SUBROUTINE WORLD
+ PRINT 42, 'WORLD'
+ 42 FORMAT(A)
+ END