URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 154 |
Rev 816 |
! { dg-do compile }
|
! { dg-do compile }
|
! Check that a pointer cannot be a member of a namelist
|
! Check that a pointer cannot be a member of a namelist
|
program namelist_3
|
program namelist_3
|
integer,pointer :: x
|
integer,pointer :: x
|
allocate (x)
|
allocate (x)
|
namelist /n/ x ! { dg-error "NAMELIST attribute conflicts with POINTER attribute" "" }
|
namelist /n/ x ! { dg-error "NAMELIST attribute conflicts with POINTER attribute" "" }
|
end program namelist_3
|
end program namelist_3
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.