Mercurial > hg > xemacs-beta

comparison src/lstream.c @ 2286:04bc9d2f42c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-09-20 19:18:55 by james] Mark all unused parameters as unused. Also eliminate some unneeded local variables.
author james
date Mon, 20 Sep 2004 19:20:08 +0000
parents 1d840489238d
children ecf1ebac70d8
comparison
equal deleted inserted replaced
2285:914c5afaac33 2286:04bc9d2f42c7
56 Lstream *lstr = XLSTREAM (obj); 56 Lstream *lstr = XLSTREAM (obj);
57 return lstr->imp->marker ? (lstr->imp->marker) (obj) : Qnil; 57 return lstr->imp->marker ? (lstr->imp->marker) (obj) : Qnil;
58 } 58 }
59 59
60 static void 60 static void
61 print_lstream (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag) 61 print_lstream (Lisp_Object obj, Lisp_Object printcharfun,
62 int UNUSED (escapeflag))
62 { 63 {
63 Lstream *lstr = XLSTREAM (obj); 64 Lstream *lstr = XLSTREAM (obj);
64 65
65 write_fmt_string (printcharfun, 66 write_fmt_string (printcharfun,
66 "#<INTERNAL OBJECT (XEmacs bug?) (%s lstream) 0x%lx>", 67 "#<INTERNAL OBJECT (XEmacs bug?) (%s lstream) 0x%lx>",
1599 Dynarr_reset (DYNARR_STREAM_DATA (stream)->dyn); 1600 Dynarr_reset (DYNARR_STREAM_DATA (stream)->dyn);
1600 return 0; 1601 return 0;
1601 } 1602 }
1602 1603
1603 static int 1604 static int
1604 dynarr_closer (Lstream *stream) 1605 dynarr_closer (Lstream *UNUSED (stream))
1605 { 1606 {
1606 return 0; 1607 return 0;
1607 } 1608 }
1608 1609
1609 /************ read from or write to a Lisp buffer ************/ 1610 /************ read from or write to a Lisp buffer ************/