BLOCK construct support in pgfortran?

Just a quick query: what is the status of BLOCK support in PGI? I ask because the model I work on (GEOS) in its future development branch is using BLOCK in quite a few places. (As do some libraries it uses.)

I know PGI 18.5 doesn’t seem to support BLOCK, but I didn’t know if it was on the near-term horizon or if we should invest in de-BLOCKing the code if we want PGI as a supported compiler.

Note I say this only because this:

program main
    integer :: y
    block
        integer :: x
        x = 0
    end block
end program main

does not seem to be liked by PGI 18.5:

$ pgfortran test.F90
PGF90-S-0034-Syntax error at or near end of line (test.F90: 3)
PGF90-S-0034-Syntax error at or near identifier block (test.F90: 6)
  0 inform,   0 warnings,   2 severes, 0 fatal for main

Hi Matt,

The BLOCK construct is something we’re actively working on. I don’t have a definite time-frame for an estimate, but BLOCK is something we’re looking to support in the near future.