Skip to content

Named select case not detected #80

Closed
@Edmundod

Description

Named select case is not recognized by fortls, while if and do are. Consider the following:

program test

  one: select case ("it is NOT working")
    case default

  end select one

  select case ("it is working")
    case default

  end select

  two: if (2==3) then

  end if two

end program test

where the first select case is not visible to fortls, while the second one is. With if everything works. It can be seen in debugger output:

=========
Parser Output
=========

program test !!! PROGRAM statement(1)
end select one !!! END "SELECT" scope(6)
select case ("it is working") !!! SELECT statement(8)
end select !!! END "SELECT" scope(11)
two: if (2==3) then !!! IF statement(13)
end if two !!! END "IF" scope(15)
end program test !!! END "PROGRAM" scope(17)

=========
Object Tree
=========

1: test
9: main::#select1
12: main::#if1

Metadata

Assignees

No one assigned

    Labels

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions