Mercurial > hg > xemacs-beta
comparison src/lstream.c @ 5126:2a462149bd6a ben-lisp-object
merge
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Wed, 24 Feb 2010 19:04:27 -0600 |
parents | b5df3737028a 6f2158fa75ed |
children | a9c41067dd88 |
comparison
equal
deleted
inserted
replaced
5125:b5df3737028a | 5126:2a462149bd6a |
---|---|
1652 struct lisp_buffer_stream *str; | 1652 struct lisp_buffer_stream *str; |
1653 Charbpos bmin, bmax; | 1653 Charbpos bmin, bmax; |
1654 int reading = !strcmp (mode, "r"); | 1654 int reading = !strcmp (mode, "r"); |
1655 | 1655 |
1656 /* Make sure the luser didn't pass "w" in. */ | 1656 /* Make sure the luser didn't pass "w" in. */ |
1657 if (!strcmp (mode, "w")) | 1657 assert (strcmp (mode, "w")); |
1658 ABORT (); | |
1659 | 1658 |
1660 if (flags & LSTR_IGNORE_ACCESSIBLE) | 1659 if (flags & LSTR_IGNORE_ACCESSIBLE) |
1661 { | 1660 { |
1662 bmin = BUF_BEG (buf); | 1661 bmin = BUF_BEG (buf); |
1663 bmax = BUF_Z (buf); | 1662 bmax = BUF_Z (buf); |