"Unexpected End of Scope at line X" when using ";" to put 2 end in the same line

This code generate error: "Unexpected End of Scope at line ..."
```Fortran
    do i=1,size(arr); associate(point => arr(i))
    ....
    end associate; end do
```
But this one not:
```Fortran
    do i=1,size(arr); associate(point => arr(i))
    ....
    end associate
end do
```
version of fortls: 2.13.0

