Revision 17ae9cdb src/Ganeti/DataCollectors/InstStatusTypes.hs

b/src/Ganeti/DataCollectors/InstStatusTypes.hs
33 33
import Ganeti.Hypervisor.Xen.Types
34 34
import Ganeti.Objects
35 35
import Ganeti.THH
36
import Ganeti.Types
36 37

  
37 38
-- | Data type representing the status of an instance to be returned.
38 39
$(buildObject "InstStatus" "iStat"
......
43 44
  , optionalNullSerField $
44 45
    simpleField "uptime"       [t| String |]
45 46
  , simpleField "mtime"        [t| Double |]
47
  , simpleField "state_reason" [t| ReasonTrail |]
46 48
  , simpleField "status"       [t| DCStatus |]
47 49
  ])

Also available in: Unified diff