explict export lists
A small amount of dead code removed. All of Utility/ done now. This commit was sponsored by Brock Spratlen on Patreon.
This commit is contained in:
parent
960f62a564
commit
1ff889e456
16 changed files with 126 additions and 25 deletions
|
@ -7,7 +7,13 @@
|
|||
|
||||
{-# LANGUAGE OverloadedStrings #-}
|
||||
|
||||
module Utility.Tense where
|
||||
module Utility.Tense (
|
||||
Tense(..),
|
||||
TenseChunk(..),
|
||||
TenseText,
|
||||
renderTense,
|
||||
tenseWords,
|
||||
) where
|
||||
|
||||
import qualified Data.Text as T
|
||||
import Data.Text (Text)
|
||||
|
@ -52,6 +58,3 @@ tenseWords = TenseText . go []
|
|||
go c ((Tensed w1 w2):ws) =
|
||||
go (Tensed (addspace w1) (addspace w2) : c) ws
|
||||
addspace w = T.append w " "
|
||||
|
||||
unTensed :: Text -> TenseText
|
||||
unTensed t = TenseText [UnTensed t]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue