From ad4f044963634ef6b6bbff4091b16d9386bd2fad Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Fri, 1 Jan 2010 23:36:17 +0900 Subject: [PATCH] adding predicates --- lib/chibi/time.module | 3 ++- lib/chibi/time.stub | 1 + 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/lib/chibi/time.module b/lib/chibi/time.module index 84f2b800..8d591100 100644 --- a/lib/chibi/time.module +++ b/lib/chibi/time.module @@ -5,7 +5,8 @@ timeval-seconds timeval-microseconds timezone-offset timezone-dst-time time-second time-minute time-hour time-day time-month time-year - time-day-of-week time-day-of-year time-dst?) + time-day-of-week time-day-of-year time-dst? + tm? timeval? timezone?) (import-immutable (scheme)) (include-shared "time")) diff --git a/lib/chibi/time.stub b/lib/chibi/time.stub index bb5cd644..adde486e 100644 --- a/lib/chibi/time.stub +++ b/lib/chibi/time.stub @@ -3,6 +3,7 @@ (c-system-include "sys/time.h") (define-c-struct tm + predicate: tm? (int tm_sec time-second) (int tm_min time-minute) (int tm_hour time-hour)