blob: c3f332b423b75fc16aee11728fd09e25badee931 (
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
+++ doc/docbook/src/tcl.xml
@@ -576,7 +576,7 @@
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 @@
if (pm->fdata[i] < min)
min = pm->fdata[i];
- sprintf( interp->result, "%f", min );
+ sprintf( Tcl_GetStringResult(interp), "%f", min );
return TCL_OK;
}
</programlisting>
|
