<commit_before>-- | Module    : Network.MPD.StringConn
-- Copyright   : (c) <NAME> 2005-2008
-- License     : LGPL (see LICENSE)
-- Maintainer  : <EMAIL>
-- Stability   : alpha
-- Portability : Haskell 98
--
-- Connection over a network socket.

module Network.MPD.StringConn (Expect, Result(..), testMPD) where

import Control.Monad (liftM)
import Prelude hiding (exp)
import Network.MPD.Core
import Data.IORef

-- | An expected request.
type Expect = String

data Result a = Ok | Failure (Response a) [(Expect,String)]
                deriving Show

-- | Run an action against a set of expected requests and responses,
-- and an expected result. The result is Nothing if everything matched
-- what was expected. If anything differed the result of the<commit_msg>N.M.StringConn.hs: fix module description<commit_after>-- | Module    : Network.MPD.StringConn
-- Copyright   : (c) <NAME> 2005-2008
-- License     : LGPL (see LICENSE)
-- Maintainer  : <EMAIL>
-- Stability   : alpha
-- Portability : Haskell 98
--
-- A testing scaffold for MPD commands

module Network.MPD.StringConn (Expect, Result(..), testMPD) where

import Control.Monad (liftM)
import Prelude hiding (exp)
import Network.MPD.Core
import Data.IORef

-- | An expected request.
type Expect = String

data Result a = Ok | Failure (Response a) [(Expect,String)]
                deriving Show

-- | Run an action against a set of expected requests and responses,
-- and an expected result. The result is Nothing if everything matched
-- what was expected. If anything differed the result of the
{'fraction_non_alphanumeric': 0.10462130937098844, 'fraction_numerical': 0.012836970474967908, 'mean_word_length': 3.202156334231806, 'pattern_counts': {'":': 0, '<': 7, '<?xml version=': 0, '>': 7, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '6478728', 'n_tokens_mistral': 479, 'n_tokens_neox': 442, 'n_words': 179}