https://gcc.gnu.org/bugzilla/show_bug.cgi?id=91473

--- Comment #4 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
(In reply to seurer from comment #0)
> make -k check-target-libgomp
> RUNTESTFLAGS=fortran.exp=libgomp.fortran/appendix-a/a.28.5.f90
> 
> FAIL: libgomp.fortran/appendix-a/a.28.5.f90   -O  (test for excess errors)

Easy enough to "fix" with

Index: testsuite/libgomp.fortran/appendix-a/a.28.5.f90                          
===================================================================             
--- testsuite/libgomp.fortran/appendix-a/a.28.5.f90     (Revision 274370)       
+++ testsuite/libgomp.fortran/appendix-a/a.28.5.f90     (Arbeitskopie)          
@@ -1,5 +1,5 @@                                                                 
 ! { dg-do compile }                                                            
-! { dg-options "-w" }                                                          
+! { dg-options "-w -std=legacy" }                                              
 !                                                                              
 ! "-w" added as libgomp/testsuite seemingly cannot parse with                  
 ! dg-warning Fortran's output. Fortran warns for "call sub1(a)" 

but the real problem is that this is illegal Fortran. You cannot have
mismatching ranks in an argument, even if it "happens" to work.

Same thing with the SPEC code, I suppose.

Reply via email to