summaryrefslogtreecommitdiff
path: root/math/plplot/files/patch-examples__tk__xtk04.c
diff options
context:
space:
mode:
authorThierry Thomas <thierry@FreeBSD.org>2013-10-02 13:17:06 +0000
committerThierry Thomas <thierry@FreeBSD.org>2013-10-02 13:17:06 +0000
commit015bed6ef707c63a18e7192fdb4cf641e28e9b6f (patch)
treedd1dd690d09dc41a63d7943e53114a104dcc85d8 /math/plplot/files/patch-examples__tk__xtk04.c
parent- patch-makenet wasn't deleted last commit (diff)
- Upgrade to 5.9.10
Changelog at http://sourceforge.net/p/plplot/news/2013/10/plplot-release-5910/ - Pet portlint - Use staging.
Notes
Notes: svn path=/head/; revision=329045
Diffstat (limited to 'math/plplot/files/patch-examples__tk__xtk04.c')
-rw-r--r--math/plplot/files/patch-examples__tk__xtk04.c33
1 files changed, 3 insertions, 30 deletions
diff --git a/math/plplot/files/patch-examples__tk__xtk04.c b/math/plplot/files/patch-examples__tk__xtk04.c
index ee64d8c82a90..9664d1eb2454 100644
--- a/math/plplot/files/patch-examples__tk__xtk04.c
+++ b/math/plplot/files/patch-examples__tk__xtk04.c
@@ -1,24 +1,6 @@
---- examples/tk/xtk04.c.orig
-+++ examples/tk/xtk04.c
-@@ -35,7 +35,7 @@
- if ( pm->fdata[i] > max )
- max = pm->fdata[i];
-
-- sprintf( interp->result, "%f", max );
-+ sprintf( Tcl_GetStringResult(interp), "%f", max );
- return TCL_OK;
- }
-
-@@ -48,7 +48,7 @@
- if ( pm->fdata[i] < min )
- min = pm->fdata[i];
-
-- sprintf( interp->result, "%f", min );
-+ sprintf( Tcl_GetStringResult(interp), "%f", min );
- return TCL_OK;
- }
-
-@@ -80,7 +80,7 @@
+--- examples/tk/xtk04.c.orig 2011-11-30 23:04:42.000000000 +0100
++++ examples/tk/xtk04.c 2013-10-01 23:08:24.000000000 +0200
+@@ -87,7 +87,7 @@
//
// Results:
// Returns a standard Tcl completion code, and leaves an error
@@ -27,12 +9,3 @@
//
// Side effects:
// Depends on the startup script.
-@@ -158,7 +158,7 @@
-
- if ( pm->dim != 2 )
- {
-- interp->result = "must use 2-d matrix.";
-+ Tcl_SetResult(interp,(char*)"must use 2-d matrix.",TCL_VOLATILE);
- return TCL_ERROR;
- }
-