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
>
>

Reply via email to