git.iko.soy/typeable/postgresql-simple
on master help sign in
Fix off-by-one error in year builder.
commitbfc5036829ce3e77ae81440f470cfcc691c57a85 authorNathan Ferris Hunter <nathan.f.hunter@gmail.com> dateWed 15 Nov 2017, 11:14 (9 years ago) parent62bea80
1 file changed+1−1
src/Database/PostgreSQL/Simple/Time/Internal/Printer.hs+1−1
src/Database/PostgreSQL/Simple/Time/Internal/Printer.hs+1−1
@@ -71,7 +71,7 @@ frac = condB (== 0) emptyB ((,) '.' >$< (liftB char8 >*< trunc12))
7171
7272
7373year :: BoundedPrim Int32
74−year = condB (> 10000) int32Dec (checkBCE >$< liftB digits4)
74+year = condB (>= 10000) int32Dec (checkBCE >$< liftB digits4)
7575 where
7676 checkBCE :: Int32 -> Int
7777 checkBCE y