Revision 5cd95d46 htest/Test/Ganeti/Types.hs
| b/htest/Test/Ganeti/Types.hs | ||
|---|---|---|
| 132 | 132 |
|
| 133 | 133 |
$(genArbitrary ''OpStatus) |
| 134 | 134 |
|
| 135 |
$(genArbitrary ''ELogType) |
|
| 136 |
|
|
| 135 | 137 |
-- * Properties |
| 136 | 138 |
|
| 137 | 139 |
prop_AllocPolicy_serialisation :: AllocPolicy -> Property |
| ... | ... | |
| 352 | 354 |
prop_OpSubmitPriority_serialisation :: OpSubmitPriority -> Property |
| 353 | 355 |
prop_OpSubmitPriority_serialisation = testSerialisation |
| 354 | 356 |
|
| 357 |
-- | Test 'ELogType' serialisation. |
|
| 358 |
prop_ELogType_serialisation :: ELogType -> Property |
|
| 359 |
prop_ELogType_serialisation = testSerialisation |
|
| 360 |
|
|
| 355 | 361 |
testSuite "Types" |
| 356 | 362 |
[ 'prop_AllocPolicy_serialisation |
| 357 | 363 |
, 'case_AllocPolicy_order |
| ... | ... | |
| 394 | 400 |
, 'prop_JobId_serialisation |
| 395 | 401 |
, 'prop_JobDependency_serialisation |
| 396 | 402 |
, 'prop_OpSubmitPriority_serialisation |
| 403 |
, 'prop_ELogType_serialisation |
|
| 397 | 404 |
] |
Also available in: Unified diff