Revision dde85e1e test/hs/Test/Ganeti/TestCommon.hs

b/test/hs/Test/Ganeti/TestCommon.hs
23 23

  
24 24
-}
25 25

  
26
module Test.Ganeti.TestCommon where
26
module Test.Ganeti.TestCommon
27
  ( maxMem
28
  , maxDsk
29
  , maxCpu
30
  , maxVcpuRatio
31
  , maxSpindleRatio
32
  , maxNodes
33
  , maxOpCodes
34
  , (==?)
35
  , (/=?)
36
  , failTest
37
  , passTest
38
  , pythonCmd
39
  , runPython
40
  , checkPythonResult
41
  , DNSChar(..)
42
  , genName
43
  , genFQDN
44
  , genMaybe
45
  , genTags
46
  , genFields
47
  , genUniquesList
48
  , SmallRatio(..)
49
  , genSet
50
  , genIp4AddrStr
51
  , genIp4Addr
52
  , genIp4NetWithNetmask
53
  , genIp4Net
54
  , genIp6Addr
55
  , genIp6Net
56
  , netmask2NumHosts
57
  , testSerialisation
58
  , resultProp
59
  , readTestData
60
  , genSample
61
  ) where
27 62

  
28 63
import Control.Applicative
29 64
import Control.Exception (catchJust)

Also available in: Unified diff