From 97299b8b3ff148f431c763979f0991e204d7e6ac Mon Sep 17 00:00:00 2001 From: sfilippone Date: Fri, 10 Apr 2026 13:37:10 +0200 Subject: [PATCH] Update VERSION file --- .VERSION | 2 +- base/modules/psb_error_mod.F90 | 1 - 2 files changed, 1 insertion(+), 2 deletions(-) diff --git a/.VERSION b/.VERSION index 1263e476..a50b5ca7 100644 --- a/.VERSION +++ b/.VERSION @@ -1,6 +1,6 @@ $Format:%d%n%n$ # Fall back version, probably last release: -3.9.0 +3.9.1 # PSBLAS version file. # diff --git a/base/modules/psb_error_mod.F90 b/base/modules/psb_error_mod.F90 index 2ab95893..086c06f2 100644 --- a/base/modules/psb_error_mod.F90 +++ b/base/modules/psb_error_mod.F90 @@ -509,7 +509,6 @@ contains write(tmpmsg,'("PSBLAS Error (",i0,") in subroutine: ",a)')& & err_c,trim(r_name) end if - select case (err_c) case(:psb_success_)