BUC5100,BUC5101 Transition on STL stringstream instead obsolete sstream. cxx, edl...

diff --git a/src/WOKTCL/WOKTCL_DefaultCommand.cxx b/src/WOKTCL/WOKTCL_DefaultCommand.cxx
index 40fc775ec473f37bd7cb249a1d2b08172e2d4af6..a2e2468520dad9f17a9cd8946a8828c6ea20da15 100755 (executable)
--- a/src/WOKTCL/WOKTCL_DefaultCommand.cxx
+++ b/src/WOKTCL/WOKTCL_DefaultCommand.cxx
@@ -4,6 +4,7 @@
 //             <jga@cobrax.paris1.matra-dtv.fr>
 
 #include <Standard_SStream.hxx>
+#include <Standard_Macro.hxx>
 
 #include <tcl.h>
 
@@ -84,10 +85,10 @@ Standard_Integer DefaultCommand(ClientData clientData, Tcl_Interp *,
   catch (Standard_Failure) {
     Handle(Standard_Failure) E = Standard_Failure::Caught();
     
-    strstream astream;
+    Standard_SStream astream;
     astream << E << ends;
 
-    ErrorMsg << argv[0] << "Exception was raised : " << astream.str() << endm;
+    ErrorMsg << argv[0] << "Exception was raised : " << GetSString(astream) << endm;
 
     WOKAPI_Session* asess = (WOKAPI_Session *) &(C->i->Session());
     asess->GeneralFailure(E);