externals/zexy/src fwriteln.c,1.6,1.7 - Pd-cvs

29 Aug 2007


      Update of /cvsroot/pure-data/externals/zexy/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21225
Modified Files:
    fwriteln.c 
Log Message:
added a "g" instead of the "f" to fwriteln.c for better precision, when using small or large numbers.:w
Index: fwriteln.c
===================================================================
RCS file: /cvsroot/pure-data/externals/zexy/src/fwriteln.c,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** fwriteln.c	24 Aug 2007 14:26:44 -0000	1.6
--- fwriteln.c	29 Aug 2007 14:36:17 -0000	1.7
***************
*** 182,186 ****
     x->width=5;
     x->precision=2;
!    strcpy(x->format_string_afloats,"%*.*f ");
     for (k=0; k<argc; k++) {
        if ((atom_getsymbol(&argv[k])==gensym("p"))&&(k+1<argc)) {
--- 182,186 ----
     x->width=5;
     x->precision=2;
!    strcpy(x->format_string_afloats,"%*.*g ");
     for (k=0; k<argc; k++) {
        if ((atom_getsymbol(&argv[k])==gensym("p"))&&(k+1<argc)) {
***************
*** 195,202 ****
        }
        else if (atom_getsymbol(&argv[k])==gensym("-")) {
! 	 strcpy(x->format_string_afloats,"%-*.*f ");
        }
        else if (atom_getsymbol(&argv[k])==gensym("+")) {
! 	 strcpy(x->format_string_afloats,"%+*.*f ");
        }
     }
--- 195,202 ----
        }
        else if (atom_getsymbol(&argv[k])==gensym("-")) {
! 	 strcpy(x->format_string_afloats,"%-*.*g ");
        }
        else if (atom_getsymbol(&argv[k])==gensym("+")) {
! 	 strcpy(x->format_string_afloats,"%+*.*g ");
        }
     }