Revision 39573352 htest/Test/Ganeti/Block/Drbd/Parser.hs

b/htest/Test/Ganeti/Block/Drbd/Parser.hs
36 36 
import Ganeti.Block.Drbd.Parser (drbdStatusParser, commaIntParser)
37 37 
import Ganeti.Block.Drbd.Types
38 38 

  		





  
  39
  
    
{-# ANN module "HLint: ignore Use camelCase" #-}


  		





  
  40
  
    

  		





  39
  41
  
    
-- | Function for testing whether a file is parsed correctly.


  		





  40
  42
  
    
testFile :: String -> DRBDStatus -> Assertion


  		





  41
  43
  
    
testFile fileName expectedContent = do


  		












Also available in:
  Unified diff