Mercurial > hg > xemacs-beta

comparison src/lstream.c @ 173:8eaf7971accc r20-3b13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b13
author cvs
date Mon, 13 Aug 2007 09:49:09 +0200
parents 0132846995bd
children 3d6bfa290dbd
comparison
equal deleted inserted replaced
172:a38aed19690b 173:8eaf7971accc
158 print_lstream (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag) 158 print_lstream (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag)
159 { 159 {
160 Lstream *lstr = XLSTREAM (obj); 160 Lstream *lstr = XLSTREAM (obj);
161 char buf[200]; 161 char buf[200];
162 162
163 sprintf (buf, "#<INTERNAL EMACS BUG (%s lstream) 0x%x>", 163 sprintf (buf, "#<INTERNAL EMACS BUG (%s lstream) 0x%p>",
164 lstr->imp->name, (EMACS_INT) lstr); 164 lstr->imp->name, lstr);
165 write_c_string (buf, printcharfun); 165 write_c_string (buf, printcharfun);
166 } 166 }
167 167
168 static void 168 static void
169 finalize_lstream (void *header, int for_disksave) 169 finalize_lstream (void *header, int for_disksave)