[gentoo-commits] repo/gentoo:master commit in: dev-haskell/hdbc-sqlite/files/
commit: 20626169d0f88ed5bc9147a1c01fdd2c2ddf1d49
Author: Sergei Trofimovich gentoo org>
AuthorDate: Sat Mar 25 18:49:22 2017 +
Commit: Sergei Trofimovich gentoo org>
CommitDate: Sat Mar 25 19:07:56 2017 +
URL:https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=20626169
dev-haskell/hdbc-sqlite: drop unused files/
Package-Manager: Portage-2.3.5, Repoman-2.3.2
dev-haskell/hdbc-sqlite/files/TestTime.hs | 100 --
1 file changed, 100 deletions(-)
diff --git a/dev-haskell/hdbc-sqlite/files/TestTime.hs
b/dev-haskell/hdbc-sqlite/files/TestTime.hs
deleted file mode 100644
index 5fd77da6105..000
--- a/dev-haskell/hdbc-sqlite/files/TestTime.hs
+++ /dev/null
@@ -1,100 +0,0 @@
-module TestTime(tests) where
-import Test.HUnit
-import Database.HDBC
-import TestUtils
-import Control.Exception
-import Data.Time
-import Data.Time.LocalTime
-import Data.Time.Clock.POSIX
-import Data.Maybe
-import Data.Convertible
-import SpecificDB
-import System.Locale(defaultTimeLocale)
-import Database.HDBC.Locale (iso8601DateFormat)
-import qualified System.Time as ST
-
-instance Eq ZonedTime where
-a == b = zonedTimeToUTC a == zonedTimeToUTC b &&
- zonedTimeZone a == zonedTimeZone b
-
-testZonedTime :: ZonedTime
-testZonedTime = fromJust $ parseTime defaultTimeLocale (iso8601DateFormat
(Just "%T %z"))
- "1989-08-01 15:33:01 -0500"
-
-testZonedTimeFrac :: ZonedTime
-testZonedTimeFrac = fromJust $ parseTime defaultTimeLocale (iso8601DateFormat
(Just "%T%Q %z"))
-"1989-08-01 15:33:01.536 -0500"
-
-
-rowdata t = [[SqlInt32 100, toSql t, SqlNull]]
-
-testDTType inputdata convToSqlValue = dbTestCase $ \dbh ->
-do run dbh ("CREATE TABLE hdbctesttime (testid INTEGER PRIMARY KEY NOT
NULL, \
-\testvalue " ++ dateTimeTypeOfSqlValue value ++ ")") []
- finally (testIt dbh) (do commit dbh
-run dbh "DROP TABLE hdbctesttime" []
-commit dbh
-)
-where testIt dbh =
- do run dbh "INSERT INTO hdbctesttime (testid, testvalue) VALUES
(?, ?)"
- [iToSql 5, value]
- commit dbh
- r <- quickQuery' dbh "SELECT testid, testvalue FROM
hdbctesttime" []
- case r of
- [[testidsv, testvaluesv]] ->
- do assertEqual "testid" (5::Int) (fromSql testidsv)
- assertEqual "testvalue" inputdata (fromSql
testvaluesv)
- value = convToSqlValue inputdata
-
-mkTest label inputdata convfunc =
-TestLabel label (testDTType inputdata convfunc)
-
-tests = TestList $
-((TestLabel "Non-frac" $ testIt testZonedTime) :
- if supportsFracTime then [TestLabel "Frac" $ testIt testZonedTimeFrac]
else [])
-
-testIt baseZonedTime =
-TestList [mkTest "Day" baseDay toSql,
- mkTest "TimeOfDay" baseTimeOfDay toSql,
- mkTest "ZonedTimeOfDay" baseZonedTimeOfDay toSql,
- mkTest "LocalTime" baseLocalTime toSql,
- mkTest "ZonedTime" baseZonedTime toSql,
- mkTest "UTCTime" baseUTCTime toSql,
- mkTest "DiffTime" baseDiffTime toSql,
- mkTest "POSIXTime" basePOSIXTime posixToSql,
- mkTest "ClockTime" baseClockTime toSql,
- mkTest "CalendarTime" baseCalendarTime toSql,
- mkTest "TimeDiff" baseTimeDiff toSql
- ]
-where
- baseDay :: Day
- baseDay = localDay baseLocalTime
-
- baseTimeOfDay :: TimeOfDay
- baseTimeOfDay = localTimeOfDay baseLocalTime
-
- baseZonedTimeOfDay :: (TimeOfDay, TimeZone)
- baseZonedTimeOfDay = fromSql (SqlZonedTime baseZonedTime)
-
- baseLocalTime :: LocalTime
- baseLocalTime = zonedTimeToLocalTime baseZonedTime
-
- baseUTCTime :: UTCTime
- baseUTCTime = convert baseZonedTime
-
- baseDiffTime :: NominalDiffTime
- baseDiffTime = basePOSIXTime
-
- basePOSIXTime :: POSIXTime
- basePOSIXTime = convert baseZonedTime
-
- baseTimeDiff :: ST.TimeDiff
- baseTimeDiff = convert baseDiffTime
-
- -- No fractional parts for these two
-
- baseClockTime :: ST.ClockTime
- baseClockTime = convert testZonedTime
-
- baseCalendarTime :: ST.CalendarTime
- baseCalendarTime = convert testZonedTime
[gentoo-commits] repo/gentoo:master commit in: dev-haskell/hdbc-sqlite/files/
commit: 99cf2cc358a202ac7f8742c3724e1aeaf0bcf0c6
Author: Michael Mair-Keimberger (asterix) gmail
com>
AuthorDate: Wed Jul 27 17:00:50 2016 +
Commit: Patrice Clement gentoo org>
CommitDate: Wed Aug 3 07:21:54 2016 +
URL:https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=99cf2cc3
dev-haskell/hdbc-sqlite: remove unused patch
Signed-off-by: Patrice Clement gentoo.org>
.../files/HDBC-sqlite3-2.3.3.0-ghc-7.6.patch | 52 --
1 file changed, 52 deletions(-)
diff --git a/dev-haskell/hdbc-sqlite/files/HDBC-sqlite3-2.3.3.0-ghc-7.6.patch
b/dev-haskell/hdbc-sqlite/files/HDBC-sqlite3-2.3.3.0-ghc-7.6.patch
deleted file mode 100644
index c0c0242..000
--- a/dev-haskell/hdbc-sqlite/files/HDBC-sqlite3-2.3.3.0-ghc-7.6.patch
+++ /dev/null
@@ -1,52 +0,0 @@
HDBC-sqlite3-2.3.3.0-orig/testsrc/TestSbasics.hs 2011-08-10
07:08:57.0 +1000
-+++ HDBC-sqlite3-2.3.3.0/testsrc/TestSbasics.hs2012-10-13
11:28:21.094200366 +1100
-@@ -1,9 +1,13 @@
-+{-# LANGUAGE CPP, ScopedTypeVariables #-}
- module TestSbasics(tests) where
- import Test.HUnit
- import Database.HDBC
- import TestUtils
- import System.IO
--import Control.Exception hiding (catch)
-+#if !MIN_VERSION_base(4,6,0)
-+import Prelude hiding (catch)
-+#endif
-+import Control.Exception
-
- openClosedb = sqlTestCase $
- do dbh <- connectDB
-@@ -140,7 +144,7 @@
--- Let's try a rollback.
-catch (withTransaction dbh (\_ -> do sExecuteMany sth rows
- fail "Foo"))
-- (\_ -> return ())
-+ (\(_::IOException) -> return ())
-sExecute qrysth []
-sFetchAllRows qrysth >>= (assertEqual "rollback" [[Just "0"]])
-
HDBC-sqlite3-2.3.3.0-orig/testsrc/Testbasics.hs2011-08-10
07:08:57.0 +1000
-+++ HDBC-sqlite3-2.3.3.0/testsrc/Testbasics.hs 2012-10-13 11:27:20.025541058
+1100
-@@ -1,9 +1,13 @@
-+{-# LANGUAGE CPP, ScopedTypeVariables #-}
- module Testbasics(tests) where
- import Test.HUnit
- import Database.HDBC
- import TestUtils
- import System.IO
--import Control.Exception hiding (catch)
-+#if !MIN_VERSION_base(4,6,0)
-+import Prelude hiding (catch)
-+#endif
-+import Control.Exception
-
- openClosedb = sqlTestCase $
- do dbh <- connectDB
-@@ -140,7 +144,7 @@
--- Let's try a rollback.
-catch (withTransaction dbh (\_ -> do executeMany sth rows
- fail "Foo"))
-- (\_ -> return ())
-+ (\(_::IOException) -> return ())
-execute qrysth []
-fetchAllRows qrysth >>= (assertEqual "rollback" [[SqlString "0"]])
-
[gentoo-commits] repo/gentoo:master commit in: dev-haskell/hdbc-sqlite/
commit: ce461f92865acadfffa8913be72159f3b6b568a9
Author: Sergei Trofimovich gentoo org>
AuthorDate: Mon Sep 21 19:58:27 2015 +
Commit: Sergei Trofimovich gentoo org>
CommitDate: Mon Sep 21 19:58:49 2015 +
URL:https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=ce461f92
dev-haskell/hdbc-sqlite: version bump, bug #561026
Reported-by: Toralf Förster
Bug: https://bugs.gentoo.org/show_bug.cgi?id=561026
Package-Manager: portage-2.2.20
dev-haskell/hdbc-sqlite/Manifest | 1 +
dev-haskell/hdbc-sqlite/hdbc-sqlite-2.3.3.1.ebuild | 45 ++
2 files changed, 46 insertions(+)
diff --git a/dev-haskell/hdbc-sqlite/Manifest b/dev-haskell/hdbc-sqlite/Manifest
index 772ab88..c9e98ba 100644
--- a/dev-haskell/hdbc-sqlite/Manifest
+++ b/dev-haskell/hdbc-sqlite/Manifest
@@ -1 +1,2 @@
DIST HDBC-sqlite3-2.3.3.0.tar.gz 14827 SHA256
22f972fc44e830d0db62313fb870cd9d020f3d8efff2928d4cdb3f66b52de684 SHA512
66dfef4fd6dbaaaea4eadd3c5201a29f8f306170ef76dbf2e8a1f4239bcdcdd5b16d6d331c8a480a9e23209b2c86cfe981d7f83d4d3a0ba617dfdfb6663ad244
WHIRLPOOL
b39aa543bfb12923dce1666e29d4f327691540d289b4faa0a83f5cf2aba2eaa3bd107947621fd46ca44b02ba9badece79cb8dbdadf597ae05efb52dc0ae6
+DIST HDBC-sqlite3-2.3.3.1.tar.gz 15544 SHA256
a783d9ab707ebfc68e3e46bd1bbb5d3d5493f50a7ccf31223d9848cff986ebea SHA512
17b2929aca806d0672ae83e1aa6122a38596504a4f23f868f1a3ff4e68f97c3aef6499f995659fa4ce82b1e8aab9a107172a7265309d4c3f4e9754e4cf756ec0
WHIRLPOOL
f7a6102c83939cb9325450f4b3dc542c2f314d478df13c4ada4725c793731d0601829a80588ff2cdfc251286b208c0f2f6f796367f8a86b46c2962cd481163e2
diff --git a/dev-haskell/hdbc-sqlite/hdbc-sqlite-2.3.3.1.ebuild
b/dev-haskell/hdbc-sqlite/hdbc-sqlite-2.3.3.1.ebuild
new file mode 100644
index 000..8404865
--- /dev/null
+++ b/dev-haskell/hdbc-sqlite/hdbc-sqlite-2.3.3.1.ebuild
@@ -0,0 +1,45 @@
+# Copyright 1999-2015 Gentoo Foundation
+# Distributed under the terms of the GNU General Public License v2
+# $Id$
+
+EAPI=5
+
+# ebuild generated by hackport 0.4.6
+
+CABAL_FEATURES="bin lib profile haddock hoogle hscolour"
+inherit haskell-cabal
+
+MY_PN="HDBC-sqlite3"
+MY_P="${MY_PN}-${PV}"
+
+DESCRIPTION="Sqlite v3 driver for HDBC"
+HOMEPAGE="https://github.com/hdbc/hdbc-sqlite3;
+SRC_URI="mirror://hackage/packages/archive/${MY_PN}/${PV}/${MY_P}.tar.gz"
+
+LICENSE="BSD"
+SLOT="2"
+KEYWORDS="~amd64 ~x86"
+IUSE="test"
+
+RDEPEND=">=dev-db/sqlite-3.0
+ >=dev-haskell/hdbc-2.3.0.0:2=[profile?]
+ dev-haskell/mtl:=[profile?]
+ dev-haskell/utf8-string:=[profile?]
+ >=dev-lang/ghc-7.4.1:=
+"
+DEPEND="${RDEPEND}
+ >=dev-haskell/cabal-1.2.3
+ test? ( dev-haskell/convertible:=[profile?]
+ dev-haskell/hunit:=[profile?]
+ dev-haskell/old-locale:=[profile?]
+ dev-haskell/old-time:=[profile?]
+ dev-haskell/testpack:=[profile?] )
+"
+
+S="${WORKDIR}/${MY_P}"
+
+# The test suite doesn't work right now. See
+#
+# https://github.com/hdbc/hdbc-sqlite3/pull/17
+#
+RESTRICT="test"
