[Chicken-users] srfi-19 add-duration

[Anthony Carrico]

Here is a bug report for add-duration. Thank you!

(10:49:21 PM) lisppaste: acarrico pasted "add-duration" at
http://paste.lisp.org/display/71475

(11:56:58 PM) raikov: acarrico: I get the same error

(03:46:43 AM) sjamaan: acarrico: You might want to post this to the
mailinglist, or mail it directly to Kon

$ csi

CHICKEN
(c)2008 The Chicken Team
(c)2000-2007 Felix L. Winkelmann
Version 3.4.0 - linux-unix-gnu-x86-64   [ 64bit manyargs dload ptables
applyhook ]
SVN rev. 11987  compiled 2008-12-02 on chew-z (Linux)

#;1> (require-extension srfi-19)
; loading /usr/local/lib/chicken/3/srfi-19.scm ...
; loading /usr/local/lib/chicken/3/srfi-19-core.so ...
; loading /usr/local/lib/chicken/3/numbers-base.so ...
; loading /usr/local/lib/chicken/3/locale.so ...
; loading /usr/local/lib/chicken/3/locale-posix.so ...
; loading /usr/local/lib/chicken/3/locale-categories.so ...
; loading /usr/local/lib/chicken/3/locale-components.so ...
; loading /usr/local/lib/chicken/3/locale-parameters.so ...
; loading /usr/local/lib/chicken/3/srfi-19-io.so ...
; loading /usr/local/lib/chicken/3/srfi-29.so ...
; loading /usr/local/lib/chicken/3/lookup-table.so ...
; loading /usr/local/lib/chicken/3/misc-extn-control-support.so ...
; loading /usr/local/lib/chicken/3/misc-extn-directory.so ...
; loading /usr/local/lib/chicken/3/misc-extn-list-support.so ...
; loading /usr/local/lib/chicken/3/stack-support.so ...
; loading /usr/local/lib/chicken/3/srfi-19-period.so ...
#;2> (add-duration (current-time) (make-time time-duration 0 60))
Error: #,(time time-duration 0 60)
"bad argument type - not a structure of the required type"
add-duration
time

        Call history:

        <syntax>                (add-duration (current-time) (make-time
time-duration 0 60))
        <syntax>                (current-time)
        <syntax>                (make-time time-duration 0 60)
        <eval>          (add-duration (current-time) (make-time
time-duration 0 60))
        <eval>          (current-time)
        <eval>          (make-time time-duration 0 60)  <--
#;2>

-- 
Anthony Carrico

signature.asc
Description: OpenPGP digital signature