Skip to content

Implement type parameters reordering

Ondřej Čertík requested to merge certik/lfortran:fmt_kind2 into master

Now this:

real(kind=c_float) r
real(c_float) r
character(kind=c_char) c
character(*) c
character(len=*) c
character(len=*, kind=c_char) c
character(*, kind=c_char) c
character(kind=c_char, len=*) c
character(:) c
character(len=:) c
character(len=:, kind=c_char) c
character(:, kind=c_char) c
character(kind=c_char, len=:) c
character(n) c
character(len=n) c
character(len=n, kind=c_char) c
character(n, kind=c_char) c
character(kind=c_char, len=n) c

gets transformed into this:

real(c_float) :: r
real(c_float) :: r
character(kind=c_char) :: c
character(*) :: c
character(*) :: c
character(*, kind=c_char) :: c
character(*, kind=c_char) :: c
character(*, kind=c_char) :: c
character(:) :: c
character(:) :: c
character(:, kind=c_char) :: c
character(:, kind=c_char) :: c
character(:, kind=c_char) :: c
character(n) :: c
character(n) :: c
character(n, kind=c_char) :: c
character(n, kind=c_char) :: c
character(n, kind=c_char) :: c

Merge request reports