From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Jon Wilson Newsgroups: gmane.lisp.guile.bugs Subject: Patch for SRFI-19 bug in guile-core Date: Fri, 06 Jul 2007 16:37:32 -0400 Message-ID: <468EA80C.8020202@wilsonjc.us> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="Boundary_(ID_8sKJGNWZpRxysxIOoGYzZA)" X-Trace: sea.gmane.org 1183754723 4312 80.91.229.12 (6 Jul 2007 20:45:23 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Fri, 6 Jul 2007 20:45:23 +0000 (UTC) To: bug-guile@gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Fri Jul 06 22:45:20 2007 connect(): Connection refused Return-path: Envelope-to: guile-bugs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1I6ug1-0003eO-QI for guile-bugs@m.gmane.org; Fri, 06 Jul 2007 22:45:19 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1I6ufq-0006Dk-Ok for guile-bugs@m.gmane.org; Fri, 06 Jul 2007 16:45:06 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1I6uZJ-0003rl-6L for bug-guile@gnu.org; Fri, 06 Jul 2007 16:38:21 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1I6uZB-0003ou-KI for bug-guile@gnu.org; Fri, 06 Jul 2007 16:38:20 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1I6uZB-0003oq-G3 for bug-guile@gnu.org; Fri, 06 Jul 2007 16:38:13 -0400 Original-Received: from mailgw2.fnal.gov ([131.225.111.12]) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1I6uZ1-0005OU-0X for bug-guile@gnu.org; Fri, 06 Jul 2007 16:38:07 -0400 Original-Received: from mailav1.fnal.gov (mailav1.fnal.gov [131.225.111.18]) by mailgw2.fnal.gov (iPlanet Messaging Server 5.2 HotFix 2.06 (built Mar 28 2005)) with SMTP id <0JKR00KQ2YKBBW@mailgw2.fnal.gov> for bug-guile@gnu.org; Fri, 06 Jul 2007 15:37:33 -0500 (CDT) Original-Received: from mailgw2.fnal.gov ([131.225.111.12]) by mailav1.fnal.gov (SAVSMTP 3.1.7.47) with SMTP id M2007070615373306819 for ; Fri, 06 Jul 2007 15:37:33 -0500 Original-Received: from conversion-daemon.mailgw2.fnal.gov by mailgw2.fnal.gov (iPlanet Messaging Server 5.2 HotFix 2.06 (built Mar 28 2005)) id <0JKR00001YLX2Z@mailgw2.fnal.gov> (original mail from jsw@wilsonjc.us) for bug-guile@gnu.org; Fri, 06 Jul 2007 15:37:33 -0500 (CDT) Original-Received: from [71.79.110.56] (cpe-71-79-110-56.columbus.res.rr.com [71.79.110.56]) by mailgw2.fnal.gov (iPlanet Messaging Server 5.2 HotFix 2.06 (built Mar 28 2005)) with ESMTPA id <0JKR0049JYMK5T@mailgw2.fnal.gov> for bug-guile@gnu.org; Fri, 06 Jul 2007 15:37:33 -0500 (CDT) User-Agent: Thunderbird 1.5.0.12 (X11/20070604) X-detected-kernel: Solaris 9 X-BeenThere: bug-guile@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Errors-To: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.bugs:3542 Archived-At: This is a multi-part message in MIME format. --Boundary_(ID_8sKJGNWZpRxysxIOoGYzZA) Content-type: text/plain; charset=ISO-8859-1; format=flowed Content-transfer-encoding: 7BIT Hi, I wrote about a bug in SRFI-19, namely that date->julian-day does not take into account the time zone offset. I also posted a patch there. However, since I got no response, I figure I probably posted to the wrong list (I had forgotten about bug-guile at the time). So, here it is again. I checked out CVS head, made the necessary change, and ran cvs diff. The resulting patch is attached. Regards, Jon --Boundary_(ID_8sKJGNWZpRxysxIOoGYzZA) Content-type: text/x-patch; name=srfi-19.diff Content-transfer-encoding: 7BIT Content-disposition: inline; filename=srfi-19.diff Index: srfi-19.scm =================================================================== RCS file: /sources/guile/guile/guile-core/srfi/srfi-19.scm,v retrieving revision 1.27 diff -r1.27 srfi-19.scm 814c814,815 < (year (date-year date))) --- > (year (date-year date)) > (offset (date-zone-offset date))) 817c818,819 < (+ (/ (+ (* hour 60 60) --- > (+ (/ (+ (- offset) > (* hour 60 60) --Boundary_(ID_8sKJGNWZpRxysxIOoGYzZA) Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Bug-guile mailing list Bug-guile@gnu.org http://lists.gnu.org/mailman/listinfo/bug-guile --Boundary_(ID_8sKJGNWZpRxysxIOoGYzZA)--