1module test_signature
2
3  interface
4    subroutine subb (arg)
5      type(atype) :: arg
6    end subroutine
7  end interface
8
9contains
10  subroutine suba &
11      (a, &
12      ! comment
13    b)
14    integer a, b
15  end subroutine
16
17  real function fna()
18    use, intrinsic :: iso_c_binding
19  end function
20
21  subroutine fnb
22    integer :: a
23  end subroutine
24
25end module test_signature
26