Fixed wrong name for act_ret.

This commit is contained in:
Salvatore Filippone
2007-05-16 15:41:24 +00:00
parent 35318812a1
commit c7e877c93f
+1 -1
View File
@@ -81,7 +81,7 @@ contains
subroutine psb_erractionsave(err_act)
integer, intent(out) :: err_act
err_act = err_action
err_action = act_ret
err_action = psb_act_ret_
end subroutine psb_erractionsave