linux下编程用 编译软件

源代码在线查看: enum_4.f90

软件大小: 49607 K
上传用户: IsABC
关键词: linux 编程 编译 软件
下载地址: 免注册下载 普通下载 VIP

相关代码

				! { dg-do compile }				! Program to test ENUM parsing errors 								program main				  implicit none				  enum, bind (c)  ! { dg-warning "New in Fortran 2003" } 				    enumerator :: red, black = 2     				    enumerator :: blue = 1, red  ! { dg-error "already" }				  end enum								  enum, bind (c)  ! { dg-warning "New in Fortran 2003" } 				    enumerator :: r, b(10) = 2  ! { dg-error "cannot be array" }				    enumerator , save :: g = 1  ! { dg-error "cannot have attributes" }  				  end  ! { dg-error " END ENUM" } 								end program main  ! { dg-excess-errors "" }							

相关资源