diff options
| author | Zack Weinberg <zack@gcc.gnu.org> | 2000-01-11 06:06:11 +0000 |
|---|---|---|
| committer | Zack Weinberg <zack@gcc.gnu.org> | 2000-01-11 06:06:11 +0000 |
| commit | 1e57ec753335e0787315fe296f3a4e9d0ab95ef1 (patch) | |
| tree | f60bc9dff04b2471ac76cf3ec8e30eedb2fd72e8 /gcc | |
| parent | 2db7017d94e602fde0eec37a9bba965e41af80c8 (diff) | |
| download | gcc-1e57ec753335e0787315fe296f3a4e9d0ab95ef1.zip gcc-1e57ec753335e0787315fe296f3a4e9d0ab95ef1.tar.gz gcc-1e57ec753335e0787315fe296f3a4e9d0ab95ef1.tar.bz2 | |
New test - apostrophes, Hollerith constants, and cpp
From-SVN: r31318
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/g77.f-torture/execute/cpp2.F | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/gcc/testsuite/g77.f-torture/execute/cpp2.F b/gcc/testsuite/g77.f-torture/execute/cpp2.F new file mode 100644 index 0000000..88f5644 --- /dev/null +++ b/gcc/testsuite/g77.f-torture/execute/cpp2.F @@ -0,0 +1,7 @@ +C The preprocessor must not mangle Hollerith constants +C which contain apostrophes. + integer i, j + data i /4hbla'/ + data j /"bla'"/ + if (i .ne. j) call abort + end |