- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Hi,
I got the following error when I tried to add task parallelism in a workshare construct.
The code works well only with the do loop parallelism and without the task parallelism.
i am simply trying to get the task parallelism to work for such loops. (ifort version is 11.1.038)
Please help me in resolving this issue.
Thanks.
ERROR -
ifort -O3 -r8 -g -traceback -openmp -c -o pc.o pc.f
: catastrophic error: **Internal compiler error: segmentation violation signal raised** Please report this error along with the circumstances in which it occurred in a Software Problem Report. Note: File and line given may not be explicit cause of this error.
compilation aborted for pc.f (code 3)
make: *** [pc.o] Error 3
The code snippet is as follows,
---------------------------------------------
c$omp parallel
c$omp do
do m = 1, m_blk(myproc)
c$omp task firstprivate(m) private(ii,jj,kk,ib,ie,jb,je,kb,ke)
do kk = 1, nk_blk(m)
do jj = 1, nj_blk(m)
do ii = 1, ni_blk(m)
ib = i_b_blk(ii,jj,kk,m)
ie = i_e_blk(ii,jj,kk,m)
jb = j_b_blk(ii,jj,kk,m)
je = j_e_blk(ii,jj,kk,m)
kb = k_b_blk(ii,jj,kk,m)
ke = k_e_blk(ii,jj,kk,m)
if(i_pc.eq.1)call pc_jac_blk
1 (m,phi(ib-1:ie+1,jb-1:je+1,kb-1:ke+1,m),
1 phi1(ib-1:ie+1,jb-1:je+1,kb-1:ke+1,m),
1 ib,ie,jb,je,kb,ke)
if(i_pc.eq.2)call pc_ssor_blk
1 (m,phi(ib-1:ie+1,jb-1:je+1,kb-1:ke+1,m),
1 phi1(ib-1:ie+1,jb-1:je+1,kb-1:ke+1,m),
1 ib,ie,jb,je,kb,ke)
enddo
enddo
enddo
c$omp end task
enddo
c$omp end do nowait
....
c$omp end parallel
--------------------------------------------------
I got the following error when I tried to add task parallelism in a workshare construct.
The code works well only with the do loop parallelism and without the task parallelism.
i am simply trying to get the task parallelism to work for such loops. (ifort version is 11.1.038)
Please help me in resolving this issue.
Thanks.
ERROR -
ifort -O3 -r8 -g -traceback -openmp -c -o pc.o pc.f
: catastrophic error: **Internal compiler error: segmentation violation signal raised** Please report this error along with the circumstances in which it occurred in a Software Problem Report. Note: File and line given may not be explicit cause of this error.
compilation aborted for pc.f (code 3)
make: *** [pc.o] Error 3
The code snippet is as follows,
---------------------------------------------
c$omp parallel
c$omp do
do m = 1, m_blk(myproc)
c$omp task firstprivate(m) private(ii,jj,kk,ib,ie,jb,je,kb,ke)
do kk = 1, nk_blk(m)
do jj = 1, nj_blk(m)
do ii = 1, ni_blk(m)
ib = i_b_blk(ii,jj,kk,m)
ie = i_e_blk(ii,jj,kk,m)
jb = j_b_blk(ii,jj,kk,m)
je = j_e_blk(ii,jj,kk,m)
kb = k_b_blk(ii,jj,kk,m)
ke = k_e_blk(ii,jj,kk,m)
if(i_pc.eq.1)call pc_jac_blk
1 (m,phi(ib-1:ie+1,jb-1:je+1,kb-1:ke+1,m),
1 phi1(ib-1:ie+1,jb-1:je+1,kb-1:ke+1,m),
1 ib,ie,jb,je,kb,ke)
if(i_pc.eq.2)call pc_ssor_blk
1 (m,phi(ib-1:ie+1,jb-1:je+1,kb-1:ke+1,m),
1 phi1(ib-1:ie+1,jb-1:je+1,kb-1:ke+1,m),
1 ib,ie,jb,je,kb,ke)
enddo
enddo
enddo
c$omp end task
enddo
c$omp end do nowait
....
c$omp end parallel
--------------------------------------------------
Link Copied
2 Replies
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Without seeing a compilable source, all I can suggest is trying a newer compiler - 12.0 Update 5 recommended.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
With the help of my colleague we were able to fix the problem by removing the -g flag in compilation.
Also, it worked with compiler version - 12.0.1.107
Thanks,
Amit
Also, it worked with compiler version - 12.0.1.107
Thanks,
Amit
Reply
Topic Options
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page