[f22c02]: tests / ctags / fortran_associate.f90  Maximize  Restore  History

Download this file

21 lines (14 with data), 318 Bytes

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
module with_associate
real :: a
contains
function do_stuff(a) result(c)
real, intent(in) :: a
associate (b => a)
c = b
end associate
end function do_stuff
subroutine do_other_stuff(a)
real, intent(in out) :: a
a = 2 * a
end subroutine do_other_stuff
end module with_associate

Get latest updates about Open Source Projects, Conferences and News.

Sign up for the SourceForge newsletter:





No, thanks