Revision 41044e04 src/Ganeti/Objects.hs
| b/src/Ganeti/Objects.hs | ||
|---|---|---|
| 512 | 512 |
-- has a special 2-level inheritance mode. |
| 513 | 513 |
$(buildObject "PartialIPolicy" "ipolicy" |
| 514 | 514 |
[ optionalField . renameField "MinMaxISpecsP" |
| 515 |
$ simpleField C.ispecsMinmax [t| MinMaxISpecs |]
|
|
| 515 |
$ simpleField C.ispecsMinmax [t| [MinMaxISpecs] |]
|
|
| 516 | 516 |
, optionalField . renameField "StdSpecP" |
| 517 | 517 |
$ simpleField "std" [t| PartialISpecParams |] |
| 518 | 518 |
, optionalField . renameField "SpindleRatioP" |
| ... | ... | |
| 527 | 527 |
-- has a special 2-level inheritance mode. |
| 528 | 528 |
$(buildObject "FilledIPolicy" "ipolicy" |
| 529 | 529 |
[ renameField "MinMaxISpecs" |
| 530 |
$ simpleField C.ispecsMinmax [t| MinMaxISpecs |]
|
|
| 530 |
$ simpleField C.ispecsMinmax [t| [MinMaxISpecs] |]
|
|
| 531 | 531 |
, renameField "StdSpec" $ simpleField "std" [t| FilledISpecParams |] |
| 532 | 532 |
, simpleField "spindle-ratio" [t| Double |] |
| 533 | 533 |
, simpleField "vcpu-ratio" [t| Double |] |
Also available in: Unified diff