Otherwise LGTM (no need to resend).
On Tue, Apr 8, 2014 at 4:14 PM, Petr Pudlák <[email protected]> wrote: > > > > On Tue, Apr 8, 2014 at 2:02 PM, Klaus Aehlig <[email protected]> wrote: > >> As lock waiting is also based on locking, export the >> test lock/owner structure, so that the tests for lock >> waiting can use them. >> >> Signed-off-by: Klaus Aehlig <[email protected]> >> --- >> test/hs/Test/Ganeti/Locking/Allocation.hs | 6 +++++- >> 1 file changed, 5 insertions(+), 1 deletion(-) >> >> diff --git a/test/hs/Test/Ganeti/Locking/Allocation.hs >> b/test/hs/Test/Ganeti/Locking/Allocation.hs >> index 5b80570..8921d35 100644 >> --- a/test/hs/Test/Ganeti/Locking/Allocation.hs >> +++ b/test/hs/Test/Ganeti/Locking/Allocation.hs >> @@ -26,7 +26,11 @@ Foundation, Inc., 51 Franklin Street, Fifth Floor, >> Boston, MA >> >> -} >> >> -module Test.Ganeti.Locking.Allocation (testLocking_Allocation) where >> +module Test.Ganeti.Locking.Allocation >> + (testLocking_Allocation >> > > Just nitpicking: Missing space after '('. > > >> + , TestLock >> + , TestOwner >> + ) where >> >> import Control.Applicative >> import qualified Data.Foldable as F >> -- >> 1.9.1.423.g4596e3a >> >> >
