diff options
| author | Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de> | 2004-07-18 15:06:31 +0200 |
|---|---|---|
| committer | Tobias Schlüter <tobi@gcc.gnu.org> | 2004-07-18 15:06:31 +0200 |
| commit | 3d23e0184a2917a9e5b1ef56b7a3c99d6398f08d (patch) | |
| tree | b6ba32246a61ec389cea61b9590d3361d76185f5 /gcc | |
| parent | f56c5d5d5bd85f893847ee74885ac2f17172b918 (diff) | |
| download | gcc-3d23e0184a2917a9e5b1ef56b7a3c99d6398f08d.zip gcc-3d23e0184a2917a9e5b1ef56b7a3c99d6398f08d.tar.gz gcc-3d23e0184a2917a9e5b1ef56b7a3c99d6398f08d.tar.bz2 | |
re PR fortran/16465 (parser chokes with ffixed-line-length-7)
PR fortran/16465
* gfortran.dg/g77//ffixed-line-length-0.f,
gfortran.dg/g77/ffixed-line-length-132.f,
gfortran.dg/g77/ffixed-line-length-72.f,
gfortran.dg/g77/ffixed-line-length-none.f: Copy from g77.dg.
gfortran.dg/g77/README: Update.
From-SVN: r84892
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 9 | ||||
| -rwxr-xr-x | gcc/testsuite/gfortran.dg/g77/README | 10 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/g77/ffixed-line-length-0.f | 7 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/g77/ffixed-line-length-132.f | 7 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/g77/ffixed-line-length-72.f | 7 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/g77/ffixed-line-length-none.f | 7 |
6 files changed, 42 insertions, 5 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index d9d4e54..59db09f 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,12 @@ +2004-07-18 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de> + + PR fortran/16465 + * gfortran.dg/g77//ffixed-line-length-0.f, + gfortran.dg/g77/ffixed-line-length-132.f, + gfortran.dg/g77/ffixed-line-length-72.f, + gfortran.dg/g77/ffixed-line-length-none.f: Copy from g77.dg. + gfortran.dg/g77/README: Update. + 2004-07-18 Kriang Lerdsuwanakij <lerdsuwa@users.sourceforge.net> PR c++/13092 diff --git a/gcc/testsuite/gfortran.dg/g77/README b/gcc/testsuite/gfortran.dg/g77/README index 763b258..12b9ba2 100755 --- a/gcc/testsuite/gfortran.dg/g77/README +++ b/gcc/testsuite/gfortran.dg/g77/README @@ -27,11 +27,11 @@ fcase-preserve.f ? ff90-1.f ? ffixed-form-1.f Y ffixed-form-2.f Y -ffixed-line-length-0.f F PR 16464 -ffixed-line-length-132.f F PR 16464 -ffixed-line-length-7.f F PR 16464 -ffixed-line-length-72.f F PR 16464 -ffixed-line-length-none.f F PR 16464 +ffixed-line-length-0.f Y +ffixed-line-length-132.f Y +ffixed-line-length-7.f F PR 16465 +ffixed-line-length-72.f Y +ffixed-line-length-none.f Y ffree-form-1.f Y ffree-form-2.f Y ffree-form-3.f Y diff --git a/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-0.f b/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-0.f new file mode 100644 index 0000000..80c4f3f --- /dev/null +++ b/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-0.f @@ -0,0 +1,7 @@ +C Test compiler flags: -ffixed-line-length-0 +C Origin: David Billinghurst <David.Billinghurst@riotinto.com> +C +C { dg-do compile } +C { dg-options "-ffixed-line-length-0" } +C The next line has length 257 + en d diff --git a/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-132.f b/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-132.f new file mode 100644 index 0000000..6101696 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-132.f @@ -0,0 +1,7 @@ +C Test compiler flags: -ffixed-line-length-132 +C Origin: David Billinghurst <David.Billinghurst@riotinto.com> +C +C { dg-do compile } +C { dg-options "-ffixed-line-length-132" } +c23456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012 + en d* diff --git a/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-72.f b/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-72.f new file mode 100644 index 0000000..8a2fad1 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-72.f @@ -0,0 +1,7 @@ +C Test compiler flags: -ffixed-line-length-72 +C Origin: David Billinghurst <David.Billinghurst@riotinto.com> +C +C { dg-do compile } +C { dg-options "-ffixed-line-length-72" } +c2345678901234567890123456789012345678901234567890123456789012345678901234567890 + en d* diff --git a/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-none.f b/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-none.f new file mode 100644 index 0000000..b4a5014 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/g77/ffixed-line-length-none.f @@ -0,0 +1,7 @@ +C Test compiler flags: -ffixed-line-length-none +C Origin: David Billinghurst <David.Billinghurst@riotinto.com> +C +C { dg-do compile } +C { dg-options "-ffixed-line-length-none" } +C The next line has length 257 + en d |