Commit 6e648d51 authored by Andreas Marek's avatar Andreas Marek
Browse files

fix line truncation error

parent e7e11622
......@@ -221,7 +221,7 @@ last_stripe_width, kernel)
! ncols - indicates the number of HH reflectors to apply; at least 1 must be available
if (ncols < 1) then
if (wantDebug) then
print *, "Returning early from compute_hh_trafo"
!print *, "Returning early from compute_hh_trafo"
endif
return
endif
......
......@@ -2159,8 +2159,8 @@ subroutine trans_ev_tridi_to_band_&
&MATH_DATATYPE&
&_openmp_&
&PRECISION&
&(obj, useGPU, wantDebug, aIntern, aIntern_dev, stripe_width, a_dim2, stripe_count, max_threads, l_nev, a_off, &
nbw, max_blk_size, bcast_buffer, bcast_buffer_dev, &
&(obj, useGPU, wantDebug, aIntern, aIntern_dev, stripe_width, a_dim2, stripe_count, max_threads, l_nev, &
a_off, nbw, max_blk_size, bcast_buffer, bcast_buffer_dev, &
hh_tau_dev, kernel_flops, kernel_time, n_times, current_local_n - bottom_msg_length, &
bottom_msg_length, i, my_thread, thread_width, kernel)
enddo
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment