callisto-debian/gimp
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

plug-ins/script-fu/interp_slib.c patch from Pedro Gimeno to fix printing

Browse Source 
2003-03-29  Manish Singh  <yosh@gimp.org>

        * plug-ins/script-fu/interp_slib.c
        * plug-ins/script-fu/interp_sliba.c: patch from Pedro Gimeno to fix
        printing of floating point numbers in script-fu. (Bug #109505)
This commit is contained in:
Manish Singh
2003-03-29 20:16:19 +00:00
committed by Manish Singh
parent 6a29d4773e
commit bbb3172db1
5 changed files with 10 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
ChangeLog
View File

@ -1,3 +1,9 @@
2003-03-29 Manish Singh <yosh@gimp.org>
* plug-ins/script-fu/interp_slib.c
* plug-ins/script-fu/interp_sliba.c: patch from Pedro Gimeno to fix
printing of floating point numbers in script-fu. (Bug #109505)
2003-03-29 Simon Budig <simon@gimp.org>
* app/tools/gimpvectortool.[ch]

2
plug-ins/script-fu/interp_slib.c
View File

@ -2711,7 +2711,7 @@ lprin1g (LISP exp, struct gen_printio * f)
if (((double) n) == FLONM (exp))
sprintf (tkbuffer, "%ld", n);
else
g_ascii_formatd (tkbuffer, sizeof(tkbuffer), "%g", FLONM (exp));
g_ascii_formatd (tkbuffer, TKBUFFERN, "%g", FLONM (exp));
gput_st (f, tkbuffer);
break;
case tc_symbol:

2
plug-ins/script-fu/interp_sliba.c
View File

@ -168,7 +168,7 @@ array_prin1 (LISP ptr, struct gen_printio *f)
gput_st (f, "#(");
for (j = 0; j < ptr->storage_as.double_array.dim; ++j)
{
g_ascii_formatd (tkbuffer, sizeof(tkbuffer), "%g",
g_ascii_formatd (tkbuffer, TKBUFFERN, "%g",
ptr->storage_as.double_array.data[j]);
gput_st (f, tkbuffer);
if ((j + 1) < ptr->storage_as.double_array.dim)

2
plug-ins/script-fu/siod/slib.c
View File

@ -2711,7 +2711,7 @@ lprin1g (LISP exp, struct gen_printio * f)
if (((double) n) == FLONM (exp))
sprintf (tkbuffer, "%ld", n);
else
g_ascii_formatd (tkbuffer, sizeof(tkbuffer), "%g", FLONM (exp));
g_ascii_formatd (tkbuffer, TKBUFFERN, "%g", FLONM (exp));
gput_st (f, tkbuffer);
break;
case tc_symbol:

2
plug-ins/script-fu/siod/sliba.c
View File

@ -168,7 +168,7 @@ array_prin1 (LISP ptr, struct gen_printio *f)
gput_st (f, "#(");
for (j = 0; j < ptr->storage_as.double_array.dim; ++j)
{
g_ascii_formatd (tkbuffer, sizeof(tkbuffer), "%g",
g_ascii_formatd (tkbuffer, TKBUFFERN, "%g",
ptr->storage_as.double_array.data[j]);
gput_st (f, tkbuffer);
if ((j + 1) < ptr->storage_as.double_array.dim)