psblas3:

psb_error_impl.F90 psb_error_mod.F90 Fixed formatting problem in some error messages.
2026-10-17 03:12:15 +00:00 · 2010-06-16 09:05:12 +00:00
parent 466bcc2c25
commit 00a54cce70
2 changed files with 0 additions and 3 deletions
@@ -231,7 +231,6 @@ contains
    end if
    if(present(a_err)) then 
      new_node%a_err_data = a_err
-      write(0,*) 'Pushing character:',a_err, '"',new_node%a_err_data
    end if
    new_node%next       => error_stack%top
    error_stack%top     => new_node