Revision 72e18df1 src/Ganeti/ConstantUtils.hs

b/src/Ganeti/ConstantUtils.hs
79 79 
-- 'Ganeti.Logging'
80 80 
devConsole :: String
81 81 
devConsole = "/dev/console"
82 

  		





  
  83
  
    
-- | Priority levels


  		





  
  84
  
    
--


  		





  
  85
  
    
-- This is defined here and not in 'Ganeti.Types' order to avoid a GHC


  		





  
  86
  
    
-- stage restriction and because there is no suitable 'declareADT'


  		





  
  87
  
    
-- variant that handles integer values directly.


  		





  
  88
  
    
priorityLow :: Int


  		





  
  89
  
    
priorityLow = 10


  		





  
  90
  
    

  		





  
  91
  
    
priorityNormal :: Int


  		





  
  92
  
    
priorityNormal = 0


  		





  
  93
  
    

  		





  
  94
  
    
priorityHigh :: Int


  		





  
  95
  
    
priorityHigh = -10


  		












Also available in:
  Unified diff