From 4087ebb4d6c3ddcc48778b0d89ed9723543ae196 Mon Sep 17 00:00:00 2001 From: Yuichi Nishiwaki Date: Wed, 25 Jun 2014 15:39:45 +0900 Subject: [PATCH] add pic_eof_p --- include/picrin/value.h | 1 + 1 file changed, 1 insertion(+) diff --git a/include/picrin/value.h b/include/picrin/value.h index 44dd0763..a569cc71 100644 --- a/include/picrin/value.h +++ b/include/picrin/value.h @@ -158,6 +158,7 @@ typedef struct pic_blob pic_blob; #define pic_int_p(v) (pic_vtype(v) == PIC_VTYPE_INT) #define pic_sym_p(v) (pic_vtype(v) == PIC_VTYPE_SYMBOL) #define pic_char_p(v) (pic_vtype(v) == PIC_VTYPE_CHAR) +#define pic_eof_p(v) (pic_vtype(v) == PIC_VTYPE_EOF) #define pic_test(v) (! pic_false_p(v))