commodities-0.2.0: Ledger/Commodity/Parse.hs
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE PackageImports #-}
module Ledger.Commodity.Parse where
import "mtl" Control.Monad.State.Class
import Data.Text.Lazy
import Ledger.Balance
import Ledger.Commodity
parseBalance :: MonadState CommodityMap m => Text -> m (Balance a)
parseBalance _str = undefined