Technical data

Debugging Parallel Fortran

115

dbx version 1.31

Type 'help' for help.

Reading symbolic information of `total.ex' . . .

MAIN:14 14 do i = 1, isize

Tell dbx to pause when sproc is called.

(dbx) set $promptonfork=1

Start the job:

(dbx) run

Warning: MP_SET_NUMTHREADS greater than available cpus

(MP_SET_NUMTHREADS = 2; cpus = 1)

Process 19324(total.ex) started

Process 19324(total.ex) has executed the "sproc" system call

Add child to process pool (n if no)? y

Reading symbolic information of Process 19325 . . .

Process 19325(total.ex) added to pool

Process 19324(total.ex) after sproc [sproc.sproc:38,0x41e130]

Source (of sproc.s) not available for process 19324

Make each process stop at the ﬁrst multiprocessed loop in the routine total,

which is on line 99. Its name will be _total_99_aaaa (see “Loop

Transformation” on page 104), so enter

(dbx) stop in _total_99_aaaa pgrp

[2] stop in _total_99_aaaa

[3] stop in _total_99_aaaa

Start them all off and wait for one of them to hit a break point.

(dbx) resume pgrp

(dbx) waitall

Process 19325(total.ex) breakpoint/trace

trap[_total_99_aaaa:16,0x4006d0]

16 j = _local_start

(dbx) showproc

Process 19324(total.ex) breakpoint/trace

trap[_total_99_aaaa:16,0x4006d0]