From 35d1bbe49b9c839567661baf1e6bfa2df43d8edd Mon Sep 17 00:00:00 2001
From: cascade <cascade@opencascade.com>
Date: Wed, 18 Feb 2004 10:12:43 +0000
Subject: [PATCH] BUC5100,BUC5101 Transition on STL stringstream instead
 obsolete sstream.  cxx, edl hxx cdl

---
 src/WOKTCL/WOKTCL_DefaultCommand.cxx | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/WOKTCL/WOKTCL_DefaultCommand.cxx b/src/WOKTCL/WOKTCL_DefaultCommand.cxx
index 40fc775..a2e2468 100755
--- 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);
-- 
2.39.5