Revision fc42a408
b/htools/Ganeti/HTools/Types.hs | ||
---|---|---|
197 | 197 |
[ THH.renameField "StdSpec" $ THH.simpleField "std" [t| ISpec |] |
198 | 198 |
, THH.renameField "MinSpec" $ THH.simpleField "min" [t| ISpec |] |
199 | 199 |
, THH.renameField "MaxSpec" $ THH.simpleField "max" [t| ISpec |] |
200 |
, THH.renameField "DiskTemplates" $ |
|
201 |
THH.simpleField "disk_templates" [t| [DiskTemplate] |] |
|
200 | 202 |
]) |
201 | 203 |
|
202 | 204 |
-- | Converts an ISpec type to a RSpec one. |
... | ... | |
211 | 213 |
defIPolicy = IPolicy { iPolicyStdSpec = defStdISpec |
212 | 214 |
, iPolicyMinSpec = defMinISpec |
213 | 215 |
, iPolicyMaxSpec = defMaxISpec |
216 |
-- hardcoding here since Constants.hs exports the |
|
217 |
-- string values, not the actual type; and in |
|
218 |
-- htools, we are mostly looking at DRBD |
|
219 |
, iPolicyDiskTemplates = [DTDrbd8, DTPlain] |
|
214 | 220 |
} |
215 | 221 |
|
216 | 222 |
-- | The dynamic resource specs of a machine (i.e. load or load |
Also available in: Unified diff