Verifying Storage Class Choice

• Misclassified x and y as shared

01: subroutine dsq(a, b, c, n)

02:c$omp paralleldo shared(a, b, c)

03:c$omp& shared(n, x, y) private(i)

04: do i = 1,n

05: x = a(i) - b(i)

06: y = b(i) + a(i)

07: c(i) = x * y

08: enddo

09:c$omp end parallel do

• Assure report:

Storage conflicts in PARALLEL DO, DSQ/2 (dsq.f):

Conflict Source Source -

Type Symbol Sink

---------------- --------------------------

Read -> Write X DSQ/7 - 5

Read -> Write Y DSQ/7 - 6

Write -> Write X DSQ/5

Write -> Write Y DSQ/6

Previous slide

Next slide

Back to first slide

View graphic version