David Edelsohn wrote:
> I have not tried this patch, but will it actually fix it?  The error
> is real_kinds(3) is outside the array bounds. Your patch fixes
> addresses a runtime problem, not a compile-time problem, if I
> understand correctly.

Yes, I realized it myself - after a hint by Dominique. The following 
should fix it. I really shouldn't try to quickly fix such bugs while 
working on something else :-(

Tobias