Line 0
Link Here
|
|
|
1 |
--- tests/TkReactor_Test.cpp.orig |
2 |
+++ tests/TkReactor_Test.cpp |
3 |
@@ -248,7 +248,7 @@ |
4 |
tk = Tk_MainWindow(tcl_interp); |
5 |
if (tk == 0) |
6 |
{ |
7 |
- ACE_ERROR_RETURN ((LM_ERROR, "Tk_Reactor_Test: %s\n", tcl_interp->result),1); |
8 |
+ ACE_ERROR_RETURN ((LM_ERROR, "Tk_Reactor_Test: %s\n", Tcl_GetStringResult(tcl_interp)),1); |
9 |
} |
10 |
|
11 |
char tcl_cmd[] = "source TkReactor_Test.tcl"; |