From 44c4c6c6d542f95cac438735ff1e0c85b403aad1 Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Thu, 9 Mar 2023 11:01:55 +0100 Subject: [PATCH] qmckl_mo_basis_select_mo is qmckl_exit_code, not bool --- org/qmckl_mo.org | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) diff --git a/org/qmckl_mo.org b/org/qmckl_mo.org index 0ee1f28..417c170 100644 --- a/org/qmckl_mo.org +++ b/org/qmckl_mo.org @@ -455,15 +455,17 @@ end interface otherwise it is kept. #+begin_src c :comments org :tangle (eval h_func) -bool qmckl_mo_basis_select_mo (const qmckl_context context, - const int32_t* keep, - const int64_t size_max); +qmckl_exit_code +qmckl_mo_basis_select_mo (const qmckl_context context, + const int32_t* keep, + const int64_t size_max); #+end_src #+begin_src c :comments org :tangle (eval c) :exports none -bool qmckl_mo_basis_select_mo (const qmckl_context context, - const int32_t* keep, - const int64_t size_max) +qmckl_exit_code +qmckl_mo_basis_select_mo (const qmckl_context context, + const int32_t* keep, + const int64_t size_max) { if (qmckl_context_check(context) == QMCKL_NULL_CONTEXT) { return qmckl_failwith( context,