diff options
Diffstat (limited to 'math/plplot/files/patch-examples__tk__xtk02.c')
| -rw-r--r-- | math/plplot/files/patch-examples__tk__xtk02.c | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/math/plplot/files/patch-examples__tk__xtk02.c b/math/plplot/files/patch-examples__tk__xtk02.c new file mode 100644 index 000000000000..dd17bd5c7f0e --- /dev/null +++ b/math/plplot/files/patch-examples__tk__xtk02.c @@ -0,0 +1,20 @@ +--- examples/tk/xtk02.c.orig ++++ examples/tk/xtk02.c +@@ -49,7 +49,7 @@ + pm->fdata[i] = y; + } + +- interp->result = "Things are cool in gumbyville."; ++ Tcl_SetResult(interp,(char*)"Things are cool in gumbyville.",TCL_VOLATILE); + return TCL_OK; + } + +@@ -82,7 +82,7 @@ + // + // Results: + // Returns a standard Tcl completion code, and leaves an error +-// message in interp->result if an error occurs. ++// message in Tcl_GetStringResult(interp) if an error occurs. + // + // Side effects: + // Depends on the startup script. |