Mercurial > hg > xemacs-beta

comparison src/doprnt.c @ 1995:4e6a63799f08

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-04-07 03:48:58 by james] Fix various ICC warnings and compilation errors.
author james
date Wed, 07 Apr 2004 03:49:00 +0000
parents 9c872f33ecbe
children 5753220a0f80
comparison
equal deleted inserted replaced
1994:cb7f3be19e9f 1995:4e6a63799f08
726 else if (strchr (bignum_converters, ch)) 726 else if (strchr (bignum_converters, ch))
727 { 727 {
728 #ifdef HAVE_BIGNUM 728 #ifdef HAVE_BIGNUM
729 if (BIGNUMP (arg.obj)) 729 if (BIGNUMP (arg.obj))
730 { 730 {
731 char *text_to_print = 731 Ibyte *text_to_print =
732 bignum_to_string (XBIGNUM_DATA (arg.obj), 732 (Ibyte *) bignum_to_string (XBIGNUM_DATA (arg.obj),
733 ch == 'n' ? 10 : 733 ch == 'n' ? 10 :
734 (ch == 'p' ? 8 : 16)); 734 (ch == 'p' ? 8 : 16));
735 doprnt_2 (stream, text_to_print, strlen (text_to_print), 735 doprnt_2 (stream, text_to_print,
736 strlen ((const char *) text_to_print),
736 spec->minwidth, -1, spec->minus_flag, 737 spec->minwidth, -1, spec->minus_flag,
737 spec->zero_flag); 738 spec->zero_flag);
739 xfree (text_to_print, Ibyte *);
738 } 740 }
739 #endif 741 #endif
740 #ifdef HAVE_RATIO 742 #ifdef HAVE_RATIO
741 if (RATIOP (arg.obj)) 743 if (RATIOP (arg.obj))
742 { 744 {
743 char *text_to_print = 745 Ibyte *text_to_print =
744 ratio_to_string (XRATIO_DATA (arg.obj), 746 (Ibyte *) ratio_to_string (XRATIO_DATA (arg.obj),
745 ch == 'n' ? 10 : 747 ch == 'n' ? 10 :
746 (ch == 'p' ? 8 : 16)); 748 (ch == 'p' ? 8 : 16));
747 doprnt_2 (stream, text_to_print, strlen (text_to_print), 749 doprnt_2 (stream, text_to_print,
750 strlen ((const char *) text_to_print),
748 spec->minwidth, -1, spec->minus_flag, 751 spec->minwidth, -1, spec->minus_flag,
749 spec->zero_flag); 752 spec->zero_flag);
753 xfree (text_to_print, Ibyte *);
750 } 754 }
751 #endif 755 #endif
752 } 756 }
753 #endif /* HAVE_BIGNUM || HAVE_RATIO */ 757 #endif /* HAVE_BIGNUM || HAVE_RATIO */
754 #ifdef HAVE_BIGFLOAT 758 #ifdef HAVE_BIGFLOAT
755 else if (strchr (bigfloat_converters, ch)) 759 else if (strchr (bigfloat_converters, ch))
756 { 760 {
757 char *text_to_print = 761 Ibyte *text_to_print =
758 bigfloat_to_string (XBIGFLOAT_DATA (arg.obj), 10); 762 (Ibyte *) bigfloat_to_string (XBIGFLOAT_DATA (arg.obj), 10);
759 doprnt_2 (stream, text_to_print, strlen (text_to_print), 763 doprnt_2 (stream, text_to_print,
764 strlen ((const char *) text_to_print),
760 spec->minwidth, -1, spec->minus_flag, spec->zero_flag); 765 spec->minwidth, -1, spec->minus_flag, spec->zero_flag);
766 xfree (text_to_print, Ibyte *);
761 } 767 }
762 #endif /* HAVE_BIGFLOAT */ 768 #endif /* HAVE_BIGFLOAT */
763 else 769 else
764 { 770 {
765 /* ASCII Decimal representation uses 2.4 times as many 771 /* ASCII Decimal representation uses 2.4 times as many