OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [testsuite/] [gfortran.dg/] [continuation_5.f] - Blame information for rev 384

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 302 jeremybenn
! { dg-do compile }
2
! { dg-options -std=f95 }
3
! PR 19262  Test limit on line continuations. Test case derived form case in PR
4
! by Steve Kargl.  Submitted by Jerry DeLisle  <jvdelisle@gcc.gnu.org>
5
       print *,
6
     c "1" // !  1
7
     c "2" // !  2
8
     c "3" // !  3
9
     c "4" // !  4
10
     c "5" // !  5
11
     c "6" // !  6
12
     c "7" // !  7
13
     c "8" // !  8
14
     c "9" // !  9
15
     c "0" // ! 10
16
     c "1" // ! 11
17
     c "2" // ! 12
18
     c "3" // ! 13
19
     c "4" // ! 14
20
     c "5" // ! 15
21
     c "6" // ! 16
22
     c "7" // ! 17
23
     c "8" // ! 18
24
     c "9"    ! 19
25
       print *,
26
     c "1" // !  1
27
     c "2" // !  2
28
     c "3" // !  3
29
     c "4" // !  4
30
     c "5" // !  5
31
     c "6" // !  6
32
     c "7" // !  7
33
     c "8" // !  8
34
     c "9" // !  9
35
!
36
c
37
*
38
C
39
     c "0" // ! 10
40
     c "1" // ! 11
41
     c "2" // ! 12
42
     c "3" // ! 13
43
     c "4" // ! 14
44
c
45
 
46
 !
47
                          !
48
     c "5" // ! 15
49
     c "6" // ! 16
50
     c "7" // ! 17
51
     c "8" // ! 18
52
     c "9" // ! 19
53
     c "0"    ! { dg-warning "Limit of 19 continuations exceeded" }
54
       end

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.