[Chicken-users] dateutils (choosing right timezone for future date)

[Graham Fawcett]

Hi folks,

In case it helps others, I've bundled up my timezone-discovering code
(attached). I should make an egg but I don't have the time right now.
I'm putting it in the public domain; might only work on Unix-like
OS'es.

[proc] (local-timezone y m d #!optional (hr -1) (min -1) (as-offset #f))

;; return the timezone for the given date as a string,
;; (e.g. "EST"). If as-offset is true, then return it in RFC-822
;; format (e.g. "-0500").

[proc] (local-timezone/srfi-19 y m d #!optional (hr -1) (min -1))

;; return the timezone for the given date in SRFI-19 format.

[proc] (make-local-date nsec sec min hour day month year)

;; Make a SRFI-19 date in the local timezone, honouring daylight savings
;; rules. Requires SRFI-19 to work (make-date).

Graham

dateutils.tgz
Description: GNU Zip compressed data