📄 a.23.5.f90
字号:
! { dg-do compile } SUBROUTINE A23_5_WRONG() COMMON /C/ X,Y! Incorrect: common block C cannot be declared both! shared and private!$OMP PARALLEL PRIVATE (/C/), SHARED(/C/) ! { dg-error "Symbol 'y' present" "" { target *-*-* } 7 } ! { dg-error "Symbol 'x' present" "" { target *-*-* } 7 } ! do work here!$OMP END PARALLEL END SUBROUTINE A23_5_WRONG
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -