Add `scm_peek_byte_or_eof'.
authorLudovic Courtès <ludo@gnu.org>
Sat, 7 May 2011 20:41:32 +0000 (22:41 +0200)
committerLudovic Courtès <ludo@gnu.org>
Sat, 7 May 2011 20:47:49 +0000 (22:47 +0200)
commit452c5ad912baee9fa64298b6a8905681557ad3ae
treed8c3fad6a61dfb240678b8243c2c0a1b645b1aad
parent040dfa6f3727342a9596b4cb0625f0e171c3d612
Add `scm_peek_byte_or_eof'.

* libguile/inline.h (scm_get_byte_or_eof): Add `SCM_UNLIKELY' for EOF.
  (scm_peek_byte_or_eof): New function.

* libguile/r6rs-ports.c (scm_lookahead_u8): Use `scm_peek_byte_or_eof'.
libguile/inline.h
libguile/r6rs-ports.c