From 35f870eecfcaaba496d54e0f290b09e63884f74c Mon Sep 17 00:00:00 2001 From: Cyrus Harmon Date: Sat, 3 Mar 2007 18:58:48 +0000 Subject: [PATCH] 1.0.3.23: fix sb-posix timeval struct * add timeval struct for #+win32 and use long instead of suseconds_t --- contrib/sb-posix/constants.lisp | 6 ++++++ version.lisp-expr | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/contrib/sb-posix/constants.lisp b/contrib/sb-posix/constants.lisp index bae76f4..a8ac3b0 100644 --- a/contrib/sb-posix/constants.lisp +++ b/contrib/sb-posix/constants.lisp @@ -391,6 +391,12 @@ (time-t sec "time_t" "tv_sec") (suseconds-t usec "suseconds_t" "tv_usec"))) + #+win32 + (:structure alien-timeval + ("struct timeval" + (time-t sec "time_t" "tv_sec") + (long usec "long" "tv_usec"))) + (:integer veof "VEOF" nil t) (:integer veol "VEOL" nil t) (:integer verase "VERASE" nil t) diff --git a/version.lisp-expr b/version.lisp-expr index 7fe02e0..0acbbaf 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"1.0.3.21" +"1.0.3.23" -- 1.7.10.4