Revision d067f40b src/Ganeti/HTools/Types.hs
| b/src/Ganeti/HTools/Types.hs | ||
|---|---|---|
| 69 | 69 |
, FailStats |
| 70 | 70 |
, OpResult |
| 71 | 71 |
, opToResult |
| 72 |
, EvacMode(..) |
|
| 73 | 72 |
, ISpec(..) |
| 74 | 73 |
, MinMaxISpecs(..) |
| 75 | 74 |
, IPolicy(..) |
| ... | ... | |
| 378 | 377 |
-- | Updates the index of the element |
| 379 | 378 |
setIdx :: a -> Int -> a |
| 380 | 379 |
|
| 381 |
-- | The iallocator node-evacuate evac_mode type. |
|
| 382 |
$(THH.declareSADT "EvacMode" |
|
| 383 |
[ ("ChangePrimary", 'C.iallocatorNevacPri)
|
|
| 384 |
, ("ChangeSecondary", 'C.iallocatorNevacSec)
|
|
| 385 |
, ("ChangeAll", 'C.iallocatorNevacAll)
|
|
| 386 |
]) |
|
| 387 |
$(THH.makeJSONInstance ''EvacMode) |
|
| 388 |
|
|
| 389 | 380 |
-- | The repair modes for the auto-repair tool. |
| 390 | 381 |
$(THH.declareSADT "AutoRepairType" |
| 391 | 382 |
-- Order is important here: from least destructive to most. |
Also available in: Unified diff