!$omp parallel do default(none) &
!$omp if (m > lbd_omp_matdim) &
!$omp shared(m,n,a,b,c) private(i,j) &
DO i = 1, m
temp = a(i,1) * b(1)
DO j = 2, n
temp = temp + a(i,j) * b(j)
c(i) = temp
!$omp end parallel do
does not compile with Sun Studio 12.3 generating the following strange message:
"matvec2.f90", f90comp: ../src/messages.c:1370: print_buffered_messages Assertion `c_i_f == cif_actual_file' failed.
f90: The kind parameter suffix is not valid on a double precision real constant form.
But there is no kind conflict in the code! Also it compiles and runs with Gnu fortran producing correct results. Any suggestions please?
Please submit a bug report. Instructions describing how to file a bug report are given at the top of the webpage for the OTN Fortran Forum. If you can provide a short program that demonstrates the problem, it might facilitate analyzing and fixing the problem.