Add a "say" function for saying messages within an app monad to the user, and link everything up to display them and track their history
15 lines
340 B
Haskell
15 lines
340 B
Haskell
module Xanthous.Prelude
|
|
( module ClassyPrelude
|
|
, Type
|
|
, Constraint
|
|
, module GHC.TypeLits
|
|
, module Control.Lens
|
|
, module Data.Void
|
|
) where
|
|
|
|
import ClassyPrelude hiding
|
|
(return, (<|), unsnoc, uncons, cons, snoc, index, (<.>), Index, say)
|
|
import Data.Kind
|
|
import GHC.TypeLits hiding (Text)
|
|
import Control.Lens
|
|
import Data.Void
|