--- OpenCASCADE6.3.0/ros/src/Draw/Draw_Interpretor.cxx.orig	2010-02-10 18:00:17.091017502 -0200
+++ OpenCASCADE6.3.0/ros/src/Draw/Draw_Interpretor.cxx	2010-02-10 18:00:40.495194816 -0200
@@ -15,7 +15,9 @@
 
 #include <string.h>
 
+#define USE_INTERP_RESULT		1
 #include <tcl.h>
+#undef USE_INTERP_RESULT
 
 #if ((TCL_MAJOR_VERSION > 8) || ((TCL_MAJOR_VERSION == 8) && (TCL_MINOR_VERSION >= 1)))
 #define TCL_USES_UTF8
--- OpenCASCADE6.3.0/ros/src/Draw/Draw_Window.cxx.orig	2010-02-10 18:11:24.933020030 -0200
+++ OpenCASCADE6.3.0/ros/src/Draw/Draw_Window.cxx	2010-02-10 18:11:44.173018981 -0200
@@ -21,7 +21,9 @@
 
 #include <Standard_ErrorHandler.hxx>
 
+#define USE_INTERP_RESULT		1
 #include <tcl.h>
+#undef USE_INTERP_RESULT
 #include <Draw_Interpretor.hxx>
 #include <TCollection_AsciiString.hxx>
 
--- OpenCASCADE6.3.0/ros/src/WOKTclTools/WOKTclTools_Interpretor.cxx.orig	2010-02-10 19:24:13.776021209 -0200
+++ OpenCASCADE6.3.0/ros/src/WOKTclTools/WOKTclTools_Interpretor.cxx	2010-02-10 19:24:31.273017331 -0200
@@ -14,7 +14,9 @@
 #include <WOKTools_HSequenceOfReturnValue.hxx>
 #include <WOKTools_Messages.hxx>
 #include <Standard_PCharacter.hxx>
+#define USE_INTERP_RESULT		1
 #include <tcl.h>
+#undef USE_INTERP_RESULT
 
 #ifdef WNT
 #include <WOKUtils_ShellManager.hxx>