X-Git-Url: http://git.imager.perl.org/imager.git/blobdiff_plain/ed60e78597806757b4bdf79fb5492e97d57ffe45..ef1a1df17671b8fe1d770ae4e9209a06e1429614:/iolayert.h

diff --git a/iolayert.h b/iolayert.h
index d2dbb4dd..8d19451c 100644
--- a/iolayert.h
+++ b/iolayert.h
@@ -90,6 +90,10 @@ struct i_io_glue_t {
   ((ig)->read_ptr < (ig)->read_end ? \
      *((ig)->read_ptr++) : \
      i_io_getc_imp(ig))
+#define i_io_nextc(ig) \
+  ((void)((ig)->read_ptr < (ig)->read_end ?	\
+	  ((ig)->read_ptr++, 0) :		\
+	  i_io_getc_imp(ig)))
 #define i_io_peekc(ig) \
   ((ig)->read_ptr < (ig)->read_end ? \
    *((ig)->read_ptr) :		     \