{-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE TupleSections #-} {-# LANGUAGE TypeFamilies #-} module Hcompta.Format.JCC.Account.Read where {- import Control.Applicative ((<$>), (<*>)) import Control.Monad (Monad(..)) import Data.Char import qualified Data.List.NonEmpty as NonEmpty import Data.Typeable () import Data.Text (Text) import qualified Text.Parsec as R hiding ( char , anyChar , crlf , newline , noneOf , oneOf , satisfy , space , spaces , string , tab ) import Text.Parsec (Stream, ParsecT) import qualified Hcompta.Account as Account import Hcompta.Format.JCC.Common.Read import qualified Hcompta.Format.JCC as JCC import qualified Hcompta.Lib.Parsec as R -}