Revision 0f0f6d7d src/Ganeti/Rpc.hs
b/src/Ganeti/Rpc.hs | ||
---|---|---|
344 | 344 |
|
345 | 345 |
$(buildObject "VgInfo" "vgInfo" |
346 | 346 |
[ simpleField "name" [t| String |] |
347 |
, simpleField "type" [t| String |] |
|
347 | 348 |
, optionalField $ simpleField "vg_free" [t| Int |] |
348 | 349 |
, optionalField $ simpleField "vg_size" [t| Int |] |
349 | 350 |
]) |
Also available in: Unified diff