Re: [patch, fortran] Reject character lengths unequal to one in BIND(C)

2018-01-28 Thread Steve Kargl
On Sun, Jan 28, 2018 at 05:00:21PM +0100, Thomas Koenig wrote: > Hello world, > > At the moment, gfortran silently accepts > >type, bind(c) :: a > character(len=2,kind=c_char) :: b >end type a > > translating this into I don't know what. With the -fc-prototypes > option, we now get

[patch, fortran] Reject character lengths unequal to one in BIND(C)

2018-01-28 Thread Thomas Koenig
Hello world, At the moment, gfortran silently accepts type, bind(c) :: a character(len=2,kind=c_char) :: b end type a translating this into I don't know what. With the -fc-prototypes option, we now get typedef struct a { char b; } a; which is clearly bogus. Any user code which ha