From dc5a454cc63004c84ab73d9bd6f2e3b24d7318da Mon Sep 17 00:00:00 2001
From: "Johann Potot." <pototschnig.johann@gmail.com>
Date: Mon, 16 Jun 2025 16:40:25 +0200
Subject: [PATCH] mark unused variables (#4250)

Co-authored-by: Johann Pototschnig <j.pototschnig@hzdr.de>
---
 src/tblite_interface.F | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/tblite_interface.F b/src/tblite_interface.F
index 48c968c453..f4e77edff1 100644
--- a/src/tblite_interface.F
+++ b/src/tblite_interface.F
@@ -360,7 +360,9 @@ CONTAINS
       END IF
 
 #else
+      MARK_USED(qs_env)
       MARK_USED(tb)
+      MARK_USED(para_env)
       CPABORT("Built without TBLITE")
 #endif