Revision 774867f2 src/Ganeti/Types.hs
b/src/Ganeti/Types.hs | ||
---|---|---|
78 | 78 |
, hypervisorToRaw |
79 | 79 |
, OobCommand(..) |
80 | 80 |
, oobCommandToRaw |
81 |
, OobStatus(..) |
|
82 |
, oobStatusToRaw |
|
81 | 83 |
, StorageType(..) |
82 | 84 |
, storageTypeToRaw |
83 | 85 |
, NodeEvacMode(..) |
... | ... | |
399 | 401 |
]) |
400 | 402 |
$(THH.makeJSONInstance ''OobCommand) |
401 | 403 |
|
404 |
-- | Oob command status |
|
405 |
$(THH.declareLADT ''String "OobStatus" |
|
406 |
[ ("OobStatusCritical", "CRITICAL") |
|
407 |
, ("OobStatusOk", "OK") |
|
408 |
, ("OobStatusUnknown", "UNKNOWN") |
|
409 |
, ("OobStatusWarning", "WARNING") |
|
410 |
]) |
|
411 |
$(THH.makeJSONInstance ''OobStatus) |
|
412 |
|
|
402 | 413 |
-- | Storage type. |
403 | 414 |
$(THH.declareLADT ''String "StorageType" |
404 | 415 |
[ ("StorageFile", "file") |
Also available in: Unified diff