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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [c_kind_tests_3.f03] - Blame information for rev 694

Details | Compare with Previous | View Log


! { dg-do compile }
!
! PR 47023: [4.6/4.7 regression] C_Sizeof: Rejects valid code
!
! Contributed by 
 
  use iso_c_binding
  real(c_double) x
  print *, c_sizeof(x)
  print *, c_sizeof(0.0_c_double)
end

Line No.	Rev	Author	Line
1	694	jeremybenn	`! { dg-do compile }`
2			`!`
3			`! PR 47023: [4.6/4.7 regression] C_Sizeof: Rejects valid code`
4			`!`
5			`! Contributed by`
6
7			`use iso_c_binding`
8			`real(c_double) x`
9			`print *, c_sizeof(x)`
10			`print *, c_sizeof(0.0_c_double)`
11			`end`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [c_kind_tests_3.f03] - Blame information for rev 694