Revision d5a93a80 htools/Ganeti/Objects.hs
| b/htools/Ganeti/Objects.hs | ||
|---|---|---|
| 357 | 357 |
, simpleField "enabled_hypervisors" [t| [String] |] |
| 358 | 358 |
-- , simpleField "hvparams" [t| [(String, [(String, String)])] |] |
| 359 | 359 |
-- , simpleField "os_hvp" [t| [(String, String)] |] |
| 360 |
, containerField $ simpleField "beparams" [t| FilledBEParams |]
|
|
| 360 |
, simpleField "beparams" [t| Container FilledBEParams |]
|
|
| 361 | 361 |
-- , simpleField "osparams" [t| [(String, String)] |] |
| 362 |
, containerField $ simpleField "nicparams" [t| FilledNICParams |]
|
|
| 362 |
, simpleField "nicparams" [t| Container FilledNICParams |]
|
|
| 363 | 363 |
-- , simpleField "ndparams" [t| FilledNDParams |] |
| 364 | 364 |
, simpleField "candidate_pool_size" [t| Int |] |
| 365 | 365 |
, simpleField "modify_etc_hosts" [t| Bool |] |
| ... | ... | |
| 381 | 381 |
|
| 382 | 382 |
$(buildObject "ConfigData" "config" $ |
| 383 | 383 |
-- timeStampFields ++ |
| 384 |
[ simpleField "version" [t| Int |]
|
|
| 385 |
, simpleField "cluster" [t| Cluster |]
|
|
| 386 |
, containerField $ simpleField "nodes" [t| Node |]
|
|
| 387 |
, containerField $ simpleField "nodegroups" [t| NodeGroup |]
|
|
| 388 |
, containerField $ simpleField "instances" [t| Instance |]
|
|
| 384 |
[ simpleField "version" [t| Int |]
|
|
| 385 |
, simpleField "cluster" [t| Cluster |]
|
|
| 386 |
, simpleField "nodes" [t| Container Node |]
|
|
| 387 |
, simpleField "nodegroups" [t| Container NodeGroup |]
|
|
| 388 |
, simpleField "instances" [t| Container Instance |]
|
|
| 389 | 389 |
] |
| 390 | 390 |
++ serialFields) |
Also available in: Unified diff