X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Flstream.c;h=8151bc7cc0268e30477aa27ba857bfc7eef49e3f;hp=5002e3b6d051516d0666045e7f742cbeaa178950;hb=ee38d21b330f5001b47a577cefb5ba7b82a3b7d3;hpb=79d2db7d65205bc85d471590726d0cf3af5598e0 diff --git a/src/lstream.c b/src/lstream.c index 5002e3b..8151bc7 100644 --- a/src/lstream.c +++ b/src/lstream.c @@ -284,7 +284,7 @@ Lstream_delete (Lstream *lstr) } } - abort (); + ABORT (); } #define Lstream_internal_error(reason, lstr) \ @@ -658,7 +658,7 @@ Lstream_seekable_p (Lstream *lstr) static int Lstream_pseudo_close (Lstream *lstr) { - if (!lstr->flags & LSTREAM_FL_IS_OPEN) + if (! (lstr->flags & LSTREAM_FL_IS_OPEN)) Lstream_internal_error ("lstream is not open", lstr); /* don't check errors here -- best not to risk file descriptor loss */ @@ -1484,7 +1484,7 @@ make_lisp_buffer_stream_1 (struct buffer *buf, Bufpos start, Bufpos end, /* Make sure the luser didn't pass "w" in. */ if (!strcmp (mode, "w")) - abort (); + ABORT (); if (flags & LSTR_IGNORE_ACCESSIBLE) {