rename symbol in paramter list of function breaks when & is used

[JHenneberg]

Hi,

renaming some to other fails when:

  function mySub(some) result(res) &
      bind(c, NAME="someName")
    implicit none

    integer(4), intent(in) :: some
    integer(4) :: res

    write(*, *) some

  end function mySub

Same is true for res, but changing the function name still works.

without ampersand it is working:

  function mySub(some) result(res) bind(c, NAME="someName")
    implicit none

    integer(4), intent(in) :: some
    integer(4) :: res

    write(*, *) some

  end function mySub

Edit: Might be also related to #59

[gnikit]

thanks for the bug report @JHenneberg I will have a look at it whenever I get some free time. Please be also aware of this rename bug #52.