RFC: Test g77.f-torture/execute/cpp4.F

[Tobias Schlüter]

Billinghurst, David (CALCRTS) wrote:
> 
> $ ../gfortran -B.. -L../../i686-pc-cygwin/libgfortran/.libs/ cpp4.F    
>  In file cpp4.F:4
> 
>       data i /4hbla'/
>               1
> Error: Syntax error in DATA statement at (1)

That's PR 16531.

>  In file cpp4.F:5
> 
>       data j /"bla'"/
>              1
> Error: Incompatible types in assignment at (1), CHARACTER(1) to INTEGER(4)
> 

That's jsut ugly :-)

But to answer your question: this is not standard-conforming, but
unfortunately it seems to be a widely-enough used language extension that we
should support it, seeing that there's already a PR for it.

- Tobi