gfortran character declaration bug

[kwmsmith]

For this declaration:

character(len=1, kind=kind('a')), dimension(63) :: fw_errstr__

Gfortran 4.2.3 on Mac OS X gives an error like this:

test_char_kind.f:2.37:

    character(len=1, kind=kind('a')), dimension(63) :: fw_errstr__    
                                  1
Error: Kind 69068 is not a CHARACTER kind at (1)

Which seems to be this bug:

http://www.mail-archive.com/gcc-bugs@gcc.gnu.org/msg201855.html

The workaround is to emit this code for the character declaration:

character(1), dimension(63) :: fw_errstr__