comparison src/lstream.c @ 5125:b5df3737028a ben-lisp-object

merge
author Ben Wing <ben@xemacs.org>
date Wed, 24 Feb 2010 01:58:04 -0600
parents 623d57b7fbe8 16112448d484
children 2a462149bd6a
comparison
equal deleted inserted replaced
5124:623d57b7fbe8 5125:b5df3737028a
850 850
851 /* We set the pointers to 0 so that we don't lose when this function 851 /* We set the pointers to 0 so that we don't lose when this function
852 is called more than once on the same object */ 852 is called more than once on the same object */
853 if (lstr->out_buffer) 853 if (lstr->out_buffer)
854 { 854 {
855 xfree (lstr->out_buffer, unsigned char *); 855 xfree (lstr->out_buffer);
856 lstr->out_buffer = 0; 856 lstr->out_buffer = 0;
857 } 857 }
858 if (lstr->in_buffer) 858 if (lstr->in_buffer)
859 { 859 {
860 xfree (lstr->in_buffer, unsigned char *); 860 xfree (lstr->in_buffer);
861 lstr->in_buffer = 0; 861 lstr->in_buffer = 0;
862 } 862 }
863 if (lstr->unget_buffer) 863 if (lstr->unget_buffer)
864 { 864 {
865 xfree (lstr->unget_buffer, unsigned char *); 865 xfree (lstr->unget_buffer);
866 lstr->unget_buffer = 0; 866 lstr->unget_buffer = 0;
867 } 867 }
868 868
869 return rc; 869 return rc;
870 } 870 }
1548 resizing_buffer_closer (Lstream *stream) 1548 resizing_buffer_closer (Lstream *stream)
1549 { 1549 {
1550 struct resizing_buffer_stream *str = RESIZING_BUFFER_STREAM_DATA (stream); 1550 struct resizing_buffer_stream *str = RESIZING_BUFFER_STREAM_DATA (stream);
1551 if (str->buf) 1551 if (str->buf)
1552 { 1552 {
1553 xfree (str->buf, unsigned char *); 1553 xfree (str->buf);
1554 str->buf = 0; 1554 str->buf = 0;
1555 } 1555 }
1556 return 0; 1556 return 0;
1557 } 1557 }
1558 1558