Hello world,
attached is a very incomplete patch for implementing
maxloc for character variables, which shows some detail
of the implementation. The very simple test program
program main
character(len=3), dimension(3) :: a
character(kind=4,len=1), dimension(2,2) :: b
a(1) = '1'
a(2) = '2'
a(3) = '3'
print *,maxloc(a)
b(1,1) = 'a'
b(2,1) = 'c'
b(1,2) = 'b'
b(2,2) = 'z'
print *,maxloc(b)
end program main
works so far, but little else so far.
The work on the library side should be straightforward, if a bit
tedious. If anything more is needed for trans-* (for the dim=1 case of
one-dimensional arrays, which is currently inlined), I'll need come back
to the list for help.
Just a heads up that I am working on this, and hope to get this
bug/missing feature in for gcc 8. Just another feature of
F2003...
Regards
Thomas
