Revision b43064d0 src/Ganeti/Objects.hs
| b/src/Ganeti/Objects.hs | ||
|---|---|---|
| 192 | 192 |
, optionalField $ |
| 193 | 193 |
simpleField "ext_reservations" [t| String |] |
| 194 | 194 |
] |
| 195 |
++ uuidFields |
|
| 195 | 196 |
++ serialFields |
| 196 | 197 |
++ tagsFields) |
| 197 | 198 |
|
| ... | ... | |
| 201 | 202 |
instance TagsObject Network where |
| 202 | 203 |
tagsOf = networkTags |
| 203 | 204 |
|
| 205 |
instance UuidObject Network where |
|
| 206 |
uuidOf = networkUuid |
|
| 207 |
|
|
| 204 | 208 |
-- * NIC definitions |
| 205 | 209 |
|
| 206 | 210 |
$(buildParam "Nic" "nicp" |
| ... | ... | |
| 639 | 643 |
, simpleField "nodes" [t| Container Node |] |
| 640 | 644 |
, simpleField "nodegroups" [t| Container NodeGroup |] |
| 641 | 645 |
, simpleField "instances" [t| Container Instance |] |
| 646 |
, simpleField "networks" [t| Container Network |] |
|
| 642 | 647 |
] |
| 643 | 648 |
++ serialFields) |
| 644 | 649 |
|
Also available in: Unified diff