From 45eff029a7e1628f271a0e31e635a313d5a27ec6 Mon Sep 17 00:00:00 2001 From: Tim Davis Date: Tue, 20 Feb 2024 12:07:01 -0600 Subject: [PATCH] . --- SPEX/SPEX_Cholesky/Source/spex_cholesky_factor.c | 2 ++ SPEX/SPEX_Utilities/Source/spex_util_internal.h | 4 +++- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/SPEX/SPEX_Cholesky/Source/spex_cholesky_factor.c b/SPEX/SPEX_Cholesky/Source/spex_cholesky_factor.c index cf1960795..955adb773 100644 --- a/SPEX/SPEX_Cholesky/Source/spex_cholesky_factor.c +++ b/SPEX/SPEX_Cholesky/Source/spex_cholesky_factor.c @@ -11,7 +11,9 @@ # define SPEX_FREE_ALL \ { \ + HERE ; \ SPEX_factorization_free(&F, option); \ + HERE ; \ } diff --git a/SPEX/SPEX_Utilities/Source/spex_util_internal.h b/SPEX/SPEX_Utilities/Source/spex_util_internal.h index c14cce853..f87f68a22 100644 --- a/SPEX/SPEX_Utilities/Source/spex_util_internal.h +++ b/SPEX/SPEX_Utilities/Source/spex_util_internal.h @@ -158,10 +158,12 @@ info = (method); \ if (info != SPEX_OK) \ { \ - printf("file %s line %d\n",__FILE__,__LINE__);\ + fprintf(stderr, "NOT OK: file %s line %d\n",__FILE__,__LINE__);\ fflush (stdout) ; \ fflush (stderr) ; \ + HERE ; \ SPEX_FREE_ALL; \ + HERE ; \ return (info); \ } \ }