Section directive should appear in the sections construct. It cannot appear as orphaned directives. This is currently caught in parsing but there is no graceful error.
program OmpOrphanedSections
use omp_lib
integer counter
counter = 0
!$omp section
print *, "An orphaned section containing a single statement"
!$omp section
counter = counter + 1
print *, "An orphaned section containing multiple statements"
!$omp sections
!$omp section
print *, "Not an orphan structured block"
!$omp end sections
Section directive should appear in the sections construct. It cannot appear as orphaned directives. This is currently caught in parsing but there is no graceful error.
```
program OmpOrphanedSections
use omp_lib
integer counter
counter = 0
!$omp section
print *, "An orphaned section containing a single statement"
!$omp section
counter = counter + 1
print *, "An orphaned section containing multiple statements"
!$omp sections
!$omp section
print *, "Not an orphan structured block"
!$omp end sections
```
Section directive should appear in the sections construct. It cannot appear as orphaned directives. This is currently caught in parsing but there is no graceful error.
```
program OmpOrphanedSections
use omp_lib
integer counter
counter = 0
!$omp section
print *, "An orphaned section containing a single statement"
!$omp section
counter = counter + 1
print *, "An orphaned section containing multiple statements"
!$omp sections
!$omp section
print *, "Not an orphan structured block"
!$omp end sections
```
Section directive should appear in the sections construct. It cannot appear as orphaned directives. This is currently caught in parsing but there is no graceful error.