[ sisc-Bugs-1238375 ] srfi-19 date->julian-day fails if time zone offset is zero

"SourceForge.net" <[email protected]> Thu, 14 Jul 2005 11:08:07 -0700
Newsgroups gmane.comp.java.sisc.devel
Message-ID <[email protected]>
Bugs item #1238375, was opened at 2005-07-14 11:08
Message generated for change (Tracker Item Submitted) made by Item Submitter
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=379534&aid=1238375&group_id=23735

Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: None
Group: None
Status: Open
Resolution: None
Priority: 5
Submitted By: John Russell (johnwrussell)
Assigned to: Nobody/Anonymous (nobody)
Summary: srfi-19 date->julian-day fails if time zone offset is zero

Initial Comment:
date->julian-day seems to succeed if the time zone
offset is, for example, -3600.  However, it fails with
a "division by zero" error if the time zone offset is 0.
 
Example session:

SISC (1.11.0-alpha) - main
#;> (require-library 'sisc/libs/srfi/srfi-19)
srfi-6
srfi-8
srfi-23
optional-args
srfi-19
#f
#;> (import srfi-19) 
#;> (date->julian-day (make-date 0 0 0 0 1 1 2004 -3600))
4906011/2
#;> (date->julian-day (make-date 0 0 0 0 1 1 2004 0))
Error in /: division by zero.
file:C:/sisc/sisc/src/sisc/modules/srfi/srfi-19/srfi-19.scm:756:11:
<from call to />
file:C:/sisc/sisc/src/sisc/modules/srfi/srfi-19/srfi-19.scm:756:11:
<from call to/argument of +>
file:C:/sisc/sisc/src/sisc/modules/srfi/srfi-19/srfi-19.scm:756:8:
<indeterminate call>

----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=379534&aid=1238375&group_id=23735


-------------------------------------------------------
SF.Net email is sponsored by: Discover Easy Linux Migration Strategies
from IBM. Find simple to follow Roadmaps, straightforward articles,
informative Webcasts and more! Get everything you need to get up to
speed, fast. http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click