From: cas <cas@opencascade.com>
Date: Thu, 7 Mar 2002 18:11:33 +0000 (+0000)
Subject: No comments
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=ede725c7bd595c2db20a48bc4bac5f88025fd4e9;p=occt-wok.git

No comments
---

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;
 }