module BNFC.Backend.Latex.InitState where

import BNFC.Prelude

import Control.Monad.Except

import BNFC.Backend.Latex.State
import BNFC.Options.GlobalOptions


latexInitState :: GlobalOptions -> Except String LatexBackendState
latexInitState :: GlobalOptions -> Except String LatexBackendState
latexInitState GlobalOptions
globalOpts = do
  LatexBackendState -> Except String LatexBackendState
forall (m :: * -> *) a. Monad m => a -> m a
return (LatexBackendState -> Except String LatexBackendState)
-> LatexBackendState -> Except String LatexBackendState
forall a b. (a -> b) -> a -> b
$ GlobalOptions -> LatexBackendState
LatexSt GlobalOptions
globalOpts