URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Go to most recent revision |
Only display areas with differences |
Details |
Blame |
View Log
Rev 154 |
Rev 816 |
! { dg-do compile }
|
! { dg-do compile }
|
! testcase from PR 17583
|
! testcase from PR 17583
|
module bidon
|
module bidon
|
|
|
interface
|
interface
|
subroutine drivexc(nspden,rho_updn)
|
subroutine drivexc(nspden,rho_updn)
|
integer, intent(in) :: nspden
|
integer, intent(in) :: nspden
|
integer, intent(in) :: rho_updn(nspden)
|
integer, intent(in) :: rho_updn(nspden)
|
end subroutine drivexc
|
end subroutine drivexc
|
end interface
|
end interface
|
|
|
end module bidon
|
end module bidon
|
|
|
subroutine nonlinear(nspden)
|
subroutine nonlinear(nspden)
|
|
|
use bidon
|
use bidon
|
|
|
integer,intent(in) :: nspden
|
integer,intent(in) :: nspden
|
|
|
end subroutine nonlinear
|
end subroutine nonlinear
|
|
|
! { dg-final { cleanup-modules "bidon" } }
|
! { dg-final { cleanup-modules "bidon" } }
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.