From 05aa88268fd4300fc3af6c82d7a5f915aba84faf Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Wed, 8 Mar 2023 23:41:57 +0100
Subject: [PATCH] add status variable for openblas_set_num_threads

---
 driver/others/blas_server_omp.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/driver/others/blas_server_omp.c b/driver/others/blas_server_omp.c
index e06ab8404..c97900f1f 100644
--- a/driver/others/blas_server_omp.c
+++ b/driver/others/blas_server_omp.c
@@ -100,6 +100,8 @@ static void adjust_thread_buffers() {
 
 void goto_set_num_threads(int num_threads) {
 
+  blas_num_threads_set = 1;
+  if (num_threads < 0) blas_num_threads_set = 0;
   if (num_threads < 1) num_threads = blas_num_threads;
 
   if (num_threads > MAX_CPU_NUMBER) num_threads = MAX_CPU_NUMBER;