Mercurial > hg > xemacs-beta

comparison src/lstream.h @ 424:11054d720c21 r21-2-20

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-20
author cvs
date Mon, 13 Aug 2007 11:26:11 +0200
parents 697ef44129c6
children
comparison
equal deleted inserted replaced
423:28d9c139be4c 424:11054d720c21
127 collected. When this function is called, all pending data 127 collected. When this function is called, all pending data
128 in the stream will already have been written out. */ 128 in the stream will already have been written out. */
129 int (*closer) (Lstream *stream); 129 int (*closer) (Lstream *stream);
130 /* Mark this object for garbage collection. Same semantics as 130 /* Mark this object for garbage collection. Same semantics as
131 a standard Lisp_Object marker. This function can be NULL. */ 131 a standard Lisp_Object marker. This function can be NULL. */
132 Lisp_Object (*marker) (Lisp_Object lstream, void (*markfun) (Lisp_Object)); 132 Lisp_Object (*marker) (Lisp_Object lstream);
133 } Lstream_implementation; 133 } Lstream_implementation;
134 134
135 #define DEFINE_LSTREAM_IMPLEMENTATION(name,c_name,size) \ 135 #define DEFINE_LSTREAM_IMPLEMENTATION(name,c_name,size) \
136 Lstream_implementation c_name[1] = \ 136 Lstream_implementation c_name[1] = \
137 { { (name), (size) } } 137 { { (name), (size) } }