From 713438e8791c22c31e8ffad55b4d4d7d3fa757d1 Mon Sep 17 00:00:00 2001
From: Olly Betts <olly@survex.com>
Date: Thu, 3 Mar 2022 19:07:06 +1300
Subject: [PATCH] Fix GCC -Wunused warning in generated Tcl wrappers

---
 Lib/tcl/std_vector.i | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Lib/tcl/std_vector.i b/Lib/tcl/std_vector.i
index e35588788..144788be5 100644
--- a/Lib/tcl/std_vector.i
+++ b/Lib/tcl/std_vector.i
@@ -50,6 +50,7 @@ int Tcl_GetBoolFromObj(Tcl_Interp *interp, Tcl_Obj *o, bool *val) {
 int SwigString_AsString(Tcl_Interp *interp, Tcl_Obj *o, std::string *val) {
     int len;
     const char* temp = Tcl_GetStringFromObj(o, &len);
+    (void)interp;
     if (temp == NULL)
         return TCL_ERROR;
     val->assign(temp, len);