Mercurial > hg > xemacs-beta
diff src/number.c @ 4959:bd169a24a554
merge
| author | Ben Wing <ben@xemacs.org> |
|---|---|
| date | Thu, 28 Jan 2010 04:27:30 -0600 |
| parents | d1d4ce10c7b4 db2db229ee82 |
| children | e813cf16c015 |
line wrap: on
line diff
--- a/src/number.c Thu Jan 28 04:02:14 2010 -0600 +++ b/src/number.c Thu Jan 28 04:27:30 2010 -0600 @@ -53,9 +53,9 @@ bignum_print (Lisp_Object obj, Lisp_Object printcharfun, int UNUSED (escapeflag)) { - CIbyte *bstr = bignum_to_string (XBIGNUM_DATA (obj), 10); - write_c_string (printcharfun, bstr); - xfree (bstr, CIbyte *); + Ascbyte *bstr = bignum_to_string (XBIGNUM_DATA (obj), 10); + write_ascstring (printcharfun, bstr); + xfree (bstr, Ascbyte *); } #ifdef NEW_GC @@ -146,7 +146,7 @@ int UNUSED (escapeflag)) { CIbyte *rstr = ratio_to_string (XRATIO_DATA (obj), 10); - write_c_string (printcharfun, rstr); + write_ascstring (printcharfun, rstr); xfree (rstr, CIbyte *); } @@ -249,8 +249,8 @@ bigfloat_print (Lisp_Object obj, Lisp_Object printcharfun, int UNUSED (escapeflag)) { - CIbyte *fstr = bigfloat_to_string (XBIGFLOAT_DATA (obj), 10); - write_c_string (printcharfun, fstr); + Ascbyte *fstr = bigfloat_to_string (XBIGFLOAT_DATA (obj), 10); + write_ascstring (printcharfun, fstr); xfree (fstr, CIbyte *); }