IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source 
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@2088 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Dave Peticolas 2000-03-18 18:18:13 +00:00
parent 51e814eabc
commit ae37bf8dfc
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/scm/srfi/srfi-19.scm
View File

@ -226,7 +226,7 @@
((char=? ch #\7) 7)
((char=? ch #\8) 8)
((char=? ch #\9) 9)
(else (error "Non-integer character" ch i))))
(else (error "Non-integer character" ch i))))
;; non-public procedure
(define (normalize-year year nowyear)
@ -416,7 +416,7 @@
(+ tzhour (/ tzminute 60)))
(erriso2 "time zone +/-"
pm-char index
string)))))))))))))))
string))))))))))))))))
(define (julian-day-number->string jdn)
@ -474,4 +474,3 @@
(erriso "day" index string)
(encode-julian-day-number
day month year))))))))))))))))