Revision 3f173b09 src/Ganeti/Types.hs

b/src/Ganeti/Types.hs
645 645 

  		





  646
  646
  
    
-- | The Ganeti job type.


  		





  647
  647
  
    
newtype JobId = JobId { fromJobId :: Int }


  		





  648
  
  
    
  deriving (Show, Eq)


  		





  
  648
  
    
  deriving (Show, Eq, Ord)


  		





  649
  649
  
    

  		





  650
  650
  
    
-- | Builds a job ID.


  		





  651
  651
  
    
makeJobId :: (Monad m) => Int -> m JobId


  		












Also available in:
  Unified diff