blob: de06f7a87e2db8cce5ee44d610380d4f76ae227a (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
--- doc/docbook/src/tcl.xml.orig 2015-04-12 10:08:04 UTC
+++ doc/docbook/src/tcl.xml
@@ -576,7 +576,7 @@ EVEN IF ADVISED OF THE POSSIBILITY OF SU
if (pm->fdata[i] > max)
max = pm->fdata[i];
- sprintf( interp->result, "%f", max );
+ sprintf( Tcl_GetStringResult(interp), "%f", max );
return TCL_OK;
}
@@ -589,7 +589,7 @@ EVEN IF ADVISED OF THE POSSIBILITY OF SU
if (pm->fdata[i] < min)
min = pm->fdata[i];
- sprintf( interp->result, "%f", min );
+ sprintf( Tcl_GetStringResult(interp), "%f", min );
return TCL_OK;
}
</programlisting>
|