Revision 5b11f8db htools/Ganeti/Confd.hs
b/htools/Ganeti/Confd.hs | ||
---|---|---|
146 | 146 |
]) |
147 | 147 |
$(makeJSONInstance ''ConfdErrorType) |
148 | 148 |
|
149 |
$(buildObject "ConfdRequest" "confdRq" $
|
|
149 |
$(buildObject "ConfdRequest" "confdRq" |
|
150 | 150 |
[ simpleField "protocol" [t| Int |] |
151 | 151 |
, simpleField "type" [t| ConfdRequestType |] |
152 | 152 |
, defaultField [| EmptyQuery |] $ simpleField "query" [t| ConfdQuery |] |
Also available in: Unified diff