parameter_save.f90

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

! { dg-do compile }
! PR 20848 - parameter and save should conflict.
  integer, parameter, save :: x=0 ! { dg-error "conflicts" }
  integer, save :: y 
  parameter (y=42)   ! { dg-error "conflicts" }
end