From ede725c7bd595c2db20a48bc4bac5f88025fd4e9 Mon Sep 17 00:00:00 2001
From: cas <cas@opencascade.com>
Date: Thu, 7 Mar 2002 18:11:33 +0000
Subject: [PATCH] No comments

---
 src/WOKTclTools/WOKTclTools_Interpretor.cxx | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/src/WOKTclTools/WOKTclTools_Interpretor.cxx b/src/WOKTclTools/WOKTclTools_Interpretor.cxx
index 4af79f5..8f4c050 100755
--- a/src/WOKTclTools/WOKTclTools_Interpretor.cxx
+++ b/src/WOKTclTools/WOKTclTools_Interpretor.cxx
@@ -445,11 +445,13 @@ Standard_Boolean WOKTclTools_Interpretor::GetReturnValues(WOKTools_Return& retva
     {
       retval.AddStringValue(argv[i]);
     }
+  if ( argc > 1 ) {
 #if defined( WNT ) && defined( _DEBUG )
-  Free ( argv );
+    Free ( argv );
 #else
-  free(argv);
+    free(argv);
 #endif  // WNT && _DEBUG
+  }
   return Standard_False;
 }
 
-- 
2.39.5