From e2c60eb90e22950a6c81ec7a233fb8742f4bd56a Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Sat, 17 Apr 2021 22:49:20 +0200
Subject: [PATCH] Update c_s2chke.c

---
 ctest/c_s2chke.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ctest/c_s2chke.c b/ctest/c_s2chke.c
index 0da9ff301..ffee77bb7 100644
--- a/ctest/c_s2chke.c
+++ b/ctest/c_s2chke.c
@@ -33,13 +33,13 @@ void F77_s2chke(char *rout) {
    extern int cblas_info, cblas_lerr, cblas_ok;
    extern int RowMajorStrg;
    extern char *cblas_rout;
-/*
+#if 0
    if (link_xerbla) /* call these first to link */
    {
       cblas_xerbla(cblas_info,cblas_rout,"");
       F77_xerbla(cblas_rout,&cblas_info);
    }
-*/
+#endif
    cblas_ok = TRUE ;
    cblas_lerr = PASSED ;