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