non_module_public.f90

来自「用于进行gcc测试」· F90 代码 · 共 6 行

! { dg-do compile }
! PR20837 - A symbol may not be declared PUBLIC or PRIVATE outside a module.
! Contributed by Joost VandeVondele <[e-mail]>
integer, parameter, public :: i=1 ! { dg-error "outside of the specification part of a module" }
END