{-# OPTIONS_GHC -fno-warn-orphans #-}
module Language.Fortran.Extras.Encoding where
import Language.Fortran.Extras.JSON()
import Data.Aeson ( ToJSON, encode )
import Data.ByteString.Lazy ( ByteString )
import Language.Fortran.PrettyPrint ( IndentablePretty, pprintAndRender )
import Language.Fortran.Version ( FortranVersion(..) )
commonEncode :: ToJSON a => a -> ByteString
commonEncode :: forall a. ToJSON a => a -> ByteString
commonEncode = forall a. ToJSON a => a -> ByteString
encode
pprint77l :: IndentablePretty a => a -> String
pprint77l :: forall a. IndentablePretty a => a -> String
pprint77l a
s = forall t.
IndentablePretty t =>
FortranVersion -> t -> Indentation -> String
pprintAndRender FortranVersion
Fortran77Legacy a
s forall a. Maybe a
Nothing