[Chicken-hackers] Problems with (make-local-timezone-locale)

[Timothy Beyer]

Hi,

Using the posix egg, and chicken 3.5.2, I cannot get the correct result for 
daylight savings time (when used with the locale and srfi-19 eggs, though it it 
seems that the problematic procedure is ##sys#decode-seconds (see last 
procedure and code leading up to it)

CHICKEN
(c)2008 The Chicken Team
(c)2000-2007 Felix L. Winkelmann
Version 3.5.2 - freebsd-unix-gnu-x86    [ manyargs dload ptables applyhook ]
SVN rev. 13416  compiled 2009-03-06 on aeonserv.aeonnet (FreeBSD)

#;1> (use posix)
; loading library posix ...
#;2> (vector-ref (seconds->local-time (current-seconds)) 8)
#t
#;3> (##sys#decode-seconds (current-seconds) #t)
#(29 42 9 25 2 109 3 83 #f 872689440)
#;4> (vector-ref (##sys#decode-seconds (current-seconds) #f) 8)
#t

Similarly, I have found when using locale and srfi-19:

#;29> (timezone-locale-offset (local-timezone-locale))
0

produces the wrong output, whereas

#;53> (timezone-locale-offset (append `(#f) (cdr (local-timezone-locale))))
-28800

works perfectly.

With respect to srfi-19:

I have checked the locale and srfi-19 eggs thoroughly, and it doesn't seem that 
the latest versions are responsible for this problem, though one procedure in 
version 2.8.0 of srfi-19 (srfi-19-core.scm) takes the wrong number of 
arguments, (that isn't related to this problem, but I suppose that Kon would 
like to know about the issue) and hence Version 2.8.0 of srfi-19 won't load 
properly without fixing that function call.

Hope this helps fix this issue.

Best Regards,
Tim