URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [include_3.f95] - Blame information for rev 749

Go to most recent revision | Details | Compare with Previous | View Log


# 1 "../../../trunk/libgfortran/generated/_abs_c4.F90"
# 1 "C:\\msys\\1.0.10\\home\\FX\\ibin\\i586-pc-mingw32\\libgfortran//"
# 1 ""
# 1 ""
# 1 "../../../trunk/libgfortran/generated/_abs_c4.F90"
!   Comment here
 
# 1 "./config.h" 1
 
# 37 "../../../trunk/libgfortran/generated/_abs_c4.F90" 2
 
# 1 "./kinds.inc" 1
# 38 "../../../trunk/libgfortran/generated/_abs_c4.F90" 2
 
# 1 "./c99_protos.inc" 1
# 39 "../../../trunk/libgfortran/generated/_abs_c4.F90" 2
 
elemental function abs_c4 (parm)
   complex (kind=4), intent (in) :: parm
   real (kind=4) :: abs_c4
 
   abs_c4 = abs (parm)
end function
 
! { dg-do compile }
! { dg-options "-fpreprocessed -g3" }

Line No.	Rev	Author	Line
1	694	jeremybenn	`# 1 "../../../trunk/libgfortran/generated/_abs_c4.F90"`
2			`# 1 "C:\\msys\\1.0.10\\home\\FX\\ibin\\i586-pc-mingw32\\libgfortran//"`
3			`# 1 ""`
4			`# 1 ""`
5			`# 1 "../../../trunk/libgfortran/generated/_abs_c4.F90"`
6			`! Comment here`
7
8			`# 1 "./config.h" 1`
9
10			`# 37 "../../../trunk/libgfortran/generated/_abs_c4.F90" 2`
11
12			`# 1 "./kinds.inc" 1`
13			`# 38 "../../../trunk/libgfortran/generated/_abs_c4.F90" 2`
14
15			`# 1 "./c99_protos.inc" 1`
16			`# 39 "../../../trunk/libgfortran/generated/_abs_c4.F90" 2`
17
18			`elemental function abs_c4 (parm)`
19			`complex (kind=4), intent (in) :: parm`
20			`real (kind=4) :: abs_c4`
21
22			`abs_c4 = abs (parm)`
23			`end function`
24
25			`! { dg-do compile }`
26			`! { dg-options "-fpreprocessed -g3" }`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [include_3.f95] - Blame information for rev 749