Library-wide export list cleanup
commit1fcdf9433560ad8c8981ac7fb6c2c901bf315fe7
authorJonathan Daugherty <cygnus@foobox.com>
dateSun 22 Jan 2017, 09:22 (10 years ago)
parent1dac87e
demos/Demo.hs−1
@@ -1,5 +1,4 @@
11{-# LANGUAGE FlexibleContexts #-}
2−
32module Main where
43
54import Graphics.Vty
src/Codec/Binary/UTF8/Debug.hs+1−2
@@ -1,7 +1,6 @@
11{-# OPTIONS_HADDOCK hide #-}
22-- Copyright 2009 Corey O'Connor
3−module Codec.Binary.UTF8.Debug
4− where
3+module Codec.Binary.UTF8.Debug where
54
65import Codec.Binary.UTF8.String ( encode )
76
src/Data/Terminfo/Eval.hs+6−6
@@ -8,12 +8,12 @@
88#defined MIN_VERSION_base(x,y,z) 1
99#endif
1010
11−{- Evaluates the paramaterized terminfo string capability with the given
12− - parameters.
13− -
14− -}
15−module Data.Terminfo.Eval (writeCapExpr)
16− where
11+-- | Evaluates the paramaterized terminfo string capability with the
12+-- given parameters.
13+module Data.Terminfo.Eval
14+ ( writeCapExpr
15+ )
16+where
1717
1818import Blaze.ByteString.Builder.Word
1919import Blaze.ByteString.Builder
src/Data/Terminfo/Parse.hs+5−4
@@ -9,10 +9,11 @@
99#defined MIN_VERSION_base(x,y,z) 1
1010#endif
1111
12−module Data.Terminfo.Parse ( module Data.Terminfo.Parse
13− , Text.Parsec.ParseError
14− )
15− where
12+module Data.Terminfo.Parse
13+ ( module Data.Terminfo.Parse
14+ , Text.Parsec.ParseError
15+ )
16+where
1617
1718import Control.Monad ( liftM )
1819import Control.DeepSeq
src/Graphics/Text/Width.hs+7−6
@@ -1,12 +1,13 @@
11-- Copyright 2009 Corey O'Connor
22{-# OPTIONS_GHC -D_XOPEN_SOURCE #-}
33{-# LANGUAGE ForeignFunctionInterface #-}
4−module Graphics.Text.Width ( wcwidth
5− , wcswidth
6− , safeWcwidth
7− , safeWcswidth
8− )
9− where
4+module Graphics.Text.Width
5+ ( wcwidth
6+ , wcswidth
7+ , safeWcwidth
8+ , safeWcswidth
9+ )
10+where
1011
1112foreign import ccall unsafe "vty_mk_wcwidth" wcwidth :: Char -> Int
1213
src/Graphics/Vty.hs+11−10
@@ -48,16 +48,17 @@
4848-- - <http://www.unixwiz.net/techtips/termios-vmin-vtime.html>
4949--
5050-- - <http://vt100.net/docs/vt100-ug/chapter3.html vt100 control sequences>
51−module Graphics.Vty ( Vty(..)
52− , mkVty
53− , module Graphics.Vty.Config
54− , module Graphics.Vty.Input
55− , module Graphics.Vty.Output
56− , module Graphics.Vty.Picture
57− , DisplayRegion
58− , Mode(..)
59− )
60− where
51+module Graphics.Vty
52+ ( Vty(..)
53+ , mkVty
54+ , module Graphics.Vty.Config
55+ , module Graphics.Vty.Input
56+ , module Graphics.Vty.Output
57+ , module Graphics.Vty.Picture
58+ , DisplayRegion
59+ , Mode(..)
60+ )
61+where
6162
6263import Graphics.Vty.Prelude
6364
src/Graphics/Vty/Attributes.hs+6−5
@@ -35,11 +35,12 @@
3535-- output previously.
3636--
3737-- \todo This API is very verbose IMO. I'd like something more succinct.
38−module Graphics.Vty.Attributes ( module Graphics.Vty.Attributes
39− , module Graphics.Vty.Attributes.Color
40− , module Graphics.Vty.Attributes.Color240
41− )
42− where
38+module Graphics.Vty.Attributes
39+ ( module Graphics.Vty.Attributes
40+ , module Graphics.Vty.Attributes.Color
41+ , module Graphics.Vty.Attributes.Color240
42+ )
43+where
4344
4445import Data.Bits
4546import Data.Default
src/Graphics/Vty/Attributes/Color.hs+1
@@ -1,4 +1,5 @@
11module Graphics.Vty.Attributes.Color where
2+
23import Data.Word
34
45-- | Abstract data type representing a color.
src/Graphics/Vty/Attributes/Color240.hs+1−3
@@ -1,6 +1,4 @@
1−{-
2− - This header file was generated by ./256colres.pl
3− -}
1+-- This header file was generated by ./256colres.pl
42module Graphics.Vty.Attributes.Color240 where
53
64import Graphics.Vty.Attributes.Color
src/Graphics/Vty/Config.hs+2−1
@@ -77,7 +77,8 @@ module Graphics.Vty.Config
7777 , standardIOConfig
7878 , runParseConfig
7979 , parseConfigFile
80− ) where
80+ )
81+where
8182
8283#if __GLASGOW_HASKELL__ > 704
8384import Prelude
src/Graphics/Vty/Debug.hs+4−3
@@ -1,7 +1,8 @@
11-- Copyright 2009-2010 Corey O'Connor
2−module Graphics.Vty.Debug ( module Graphics.Vty.Debug
3− , module Graphics.Vty.Debug.Image
4− )
2+module Graphics.Vty.Debug
3+ ( module Graphics.Vty.Debug
4+ , module Graphics.Vty.Debug.Image
5+ )
56where
67
78import Graphics.Vty.Prelude
src/Graphics/Vty/DisplayAttributes.hs+1−2
@@ -6,8 +6,7 @@
66#defined MIN_VERSION_base(x,y,z) 1
77#endif
88
9−module Graphics.Vty.DisplayAttributes
10− where
9+module Graphics.Vty.DisplayAttributes where
1110
1211import Graphics.Vty.Attributes
1312
src/Graphics/Vty/Error.hs+1−2
@@ -1,5 +1,4 @@
1−module Graphics.Vty.Error
2− where
1+module Graphics.Vty.Error where
32
43-- | The type of exceptions specific to vty.
54--
src/Graphics/Vty/Image.hs+43−42
@@ -2,48 +2,49 @@
22{-# LANGUAGE BangPatterns #-}
33{-# LANGUAGE NamedFieldPuns #-}
44{-# LANGUAGE DisambiguateRecordFields #-}
5−module Graphics.Vty.Image ( DisplayText
6− , Image
7− , imageWidth
8− , imageHeight
9− , horizJoin
10− , (<|>)
11− , vertJoin
12− , (<->)
13− , horizCat
14− , vertCat
15− , backgroundFill
16− , text
17− , text'
18− , char
19− , string
20− , iso10646String
21− , utf8String
22− , utf8Bytestring
23− , utf8Bytestring'
24− , charFill
25− , emptyImage
26− , safeWcwidth
27− , safeWcswidth
28− , wcwidth
29− , wcswidth
30− , crop
31− , cropRight
32− , cropLeft
33− , cropBottom
34− , cropTop
35− , pad
36− , resize
37− , resizeWidth
38− , resizeHeight
39− , translate
40− , translateX
41− , translateY
42− -- | The possible display attributes used in
43− -- constructing an `Image`.
44− , module Graphics.Vty.Attributes
45− )
46− where
5+module Graphics.Vty.Image
6+ ( DisplayText
7+ , Image
8+ , imageWidth
9+ , imageHeight
10+ , horizJoin
11+ , (<|>)
12+ , vertJoin
13+ , (<->)
14+ , horizCat
15+ , vertCat
16+ , backgroundFill
17+ , text
18+ , text'
19+ , char
20+ , string
21+ , iso10646String
22+ , utf8String
23+ , utf8Bytestring
24+ , utf8Bytestring'
25+ , charFill
26+ , emptyImage
27+ , safeWcwidth
28+ , safeWcswidth
29+ , wcwidth
30+ , wcswidth
31+ , crop
32+ , cropRight
33+ , cropLeft
34+ , cropBottom
35+ , cropTop
36+ , pad
37+ , resize
38+ , resizeWidth
39+ , resizeHeight
40+ , translate
41+ , translateX
42+ , translateY
43+ -- | The possible display attributes used in
44+ -- constructing an `Image`.
45+ , module Graphics.Vty.Attributes
46+ )
47+where
4748
4849import Graphics.Vty.Attributes
4950import Graphics.Vty.Image.Internal
src/Graphics/Vty/Inline.hs+12−11
@@ -1,3 +1,10 @@
1+{-# LANGUAGE CPP #-}
2+{-# LANGUAGE BangPatterns #-}
3+
4+#ifndef MIN_VERSION_base
5+#defined MIN_VERSION_base(x,y,z) 1
6+#endif
7+
18-- | The inline module provides a limited interface to changing the
29-- style of terminal output. The intention is for this interface to be
310-- used inline with other output systems.
@@ -27,17 +34,11 @@
2734-- different 'Handle' than 'putAttrChange'
2835--
2936-- Copyright 2009-2010 Corey O'Connor
30−{-# LANGUAGE CPP #-}
31−{-# LANGUAGE BangPatterns #-}
32−
33−#ifndef MIN_VERSION_base
34−#defined MIN_VERSION_base(x,y,z) 1
35−#endif
36−
37−module Graphics.Vty.Inline ( module Graphics.Vty.Inline
38− , withVty
39− )
40− where
37+module Graphics.Vty.Inline
38+ ( module Graphics.Vty.Inline
39+ , withVty
40+ )
41+where
4142
4243import Graphics.Vty
4344import Graphics.Vty.DisplayAttributes
src/Graphics/Vty/Input.hs+9−8
@@ -142,14 +142,15 @@
142142--
143143-- In my experience this cannot resolve the issues without changes to
144144-- the terminal emulator and device.
145−module Graphics.Vty.Input ( Key(..)
146− , Modifier(..)
147− , Button(..)
148− , Event(..)
149− , Input(..)
150− , inputForConfig
151− )
152− where
145+module Graphics.Vty.Input
146+ ( Key(..)
147+ , Modifier(..)
148+ , Button(..)
149+ , Event(..)
150+ , Input(..)
151+ , inputForConfig
152+ )
153+where
153154
154155import Graphics.Vty.Config
155156import Graphics.Vty.Input.Events
src/Graphics/Vty/Input/Classify.hs+4−3
@@ -5,9 +5,10 @@
55-- TODO: The ClassifyMap interface requires this code to always assure
66-- later entries override earlier.
77module Graphics.Vty.Input.Classify
8− ( classify
9− , KClass(..)
10− ) where
8+ ( classify
9+ , KClass(..)
10+ )
11+where
1112
1213import Graphics.Vty.Input.Events
1314import Graphics.Vty.Input.Mouse
src/Graphics/Vty/Input/Classify/Parse.hs+8−7
@@ -1,13 +1,14 @@
11-- | This module provides a simple parser for parsing input event
22-- control sequences.
33module Graphics.Vty.Input.Classify.Parse
4− ( Parser
5− , runParser
6− , failParse
7− , readInt
8− , readChar
9− , expectChar
10− ) where
4+ ( Parser
5+ , runParser
6+ , failParse
7+ , readInt
8+ , readChar
9+ , expectChar
10+ )
11+where
1112
1213import Graphics.Vty.Input.Events
1314import Graphics.Vty.Input.Classify.Types
src/Graphics/Vty/Input/Classify/Types.hs+3−2
@@ -1,8 +1,9 @@
11-- | This module exports the input classification type to avoid import
22-- cycles between other modules that need this.
33module Graphics.Vty.Input.Classify.Types
4− ( KClass(..)
5− ) where
4+ ( KClass(..)
5+ )
6+where
67
78import Graphics.Vty.Input.Events
89
src/Graphics/Vty/Input/Mouse.hs+6−5
@@ -3,11 +3,12 @@
33--
44-- http://invisible-island.net/xterm/ctlseqs/ctlseqs.html#h2-Mouse-Tracking
55module Graphics.Vty.Input.Mouse
6− ( requestMouseEvents
7− , disableMouseEvents
8− , isMouseEvent
9− , classifyMouseEvent
10− ) where
6+ ( requestMouseEvents
7+ , disableMouseEvents
8+ , isMouseEvent
9+ , classifyMouseEvent
10+ )
11+where
1112
1213import Graphics.Vty.Input.Events
1314import Graphics.Vty.Input.Classify.Types
src/Graphics/Vty/Input/Paste.hs+5−4
@@ -2,10 +2,11 @@
22--
33-- http://cirw.in/blog/bracketed-paste
44module Graphics.Vty.Input.Paste
5− ( parseBracketedPaste
6− , bracketedPasteStarted
7− , bracketedPasteFinished
8− ) where
5+ ( parseBracketedPaste
6+ , bracketedPasteStarted
7+ , bracketedPasteFinished
8+ )
9+where
910
1011import qualified Data.ByteString.Char8 as BS8
1112
src/Graphics/Vty/Output.hs+9−8
@@ -22,14 +22,15 @@
2222-- interface suitable for xterm-like terminals. These are the terminals
2323-- where TERM == xterm. This does use terminfo for as many control codes
2424-- as possible.
25−module Graphics.Vty.Output ( module Graphics.Vty.Output
26− , Output(..) -- \todo hide constructors
27− , AssumedState(..)
28− , DisplayContext(..) -- \todo hide constructors
29− , outputPicture
30− , displayContext
31− )
32− where
25+module Graphics.Vty.Output
26+ ( module Graphics.Vty.Output
27+ , Output(..) -- \todo hide constructors
28+ , AssumedState(..)
29+ , DisplayContext(..) -- \todo hide constructors
30+ , outputPicture
31+ , displayContext
32+ )
33+where
3334
3435import Graphics.Vty.Prelude
3536
src/Graphics/Vty/Output/Interface.hs+1−2
@@ -11,8 +11,7 @@
1111#defined MIN_VERSION_base(x,y,z) 1
1212#endif
1313
14−module Graphics.Vty.Output.Interface
15−where
14+module Graphics.Vty.Output.Interface where
1615
1716import Graphics.Vty.Prelude
1817
src/Graphics/Vty/Output/Mock.hs+5−2
@@ -4,8 +4,11 @@
44-- | This provides a mock terminal implementation that is nice for
55-- testing. This transforms the output operations to visible characters.
66-- Which is nice for some tests.
7−module Graphics.Vty.Output.Mock ( MockData, mockTerminal )
8− where
7+module Graphics.Vty.Output.Mock
8+ ( MockData
9+ , mockTerminal
10+ )
11+where
912
1013import Graphics.Vty.Prelude
1114
src/Graphics/Vty/Output/TerminfoBased.hs+4−2
@@ -15,8 +15,10 @@
1515-- entirely based of the docs. Probably with some assumptions mixed in.
1616--
1717-- Copyright Corey O'Connor (coreyoconnor@gmail.com)
18−module Graphics.Vty.Output.TerminfoBased ( reserveTerminal )
19− where
18+module Graphics.Vty.Output.TerminfoBased
19+ ( reserveTerminal
20+ )
21+where
2022
2123import Graphics.Vty.Prelude
2224
src/Graphics/Vty/Output/XTermColor.hs+4−2
@@ -5,8 +5,10 @@
55#endif
66
77-- Copyright 2009-2010 Corey O'Connor
8−module Graphics.Vty.Output.XTermColor ( reserveTerminal )
9− where
8+module Graphics.Vty.Output.XTermColor
9+ ( reserveTerminal
10+ )
11+where
1012
1113import Graphics.Vty.Output.Interface
1214import Graphics.Vty.Input.Mouse
src/Graphics/Vty/Picture.hs+5−4
@@ -3,10 +3,11 @@
33-- terminal view.
44--
55-- A 'Picture' is a background paired with a layer of 'Image's.
6−module Graphics.Vty.Picture ( module Graphics.Vty.Picture
7− , module Graphics.Vty.Image
8− )
9− where
6+module Graphics.Vty.Picture
7+ ( module Graphics.Vty.Picture
8+ , module Graphics.Vty.Image
9+ )
10+where
1011
1112import Graphics.Vty.Image
1213
src/Graphics/Vty/PictureToSpans.hs+1−2
@@ -10,8 +10,7 @@
1010#defined MIN_VERSION_base(x,y,z) 1
1111#endif
1212
13−{- | Transforms an image into rows of operations.
14− -}
13+-- | Transforms an image into rows of operations.
1514module Graphics.Vty.PictureToSpans where
1615
1716import Graphics.Vty.Prelude
src/Graphics/Vty/Prelude.hs+5−4
@@ -1,8 +1,9 @@
11-- | Prelude for Vty modules. Not particularly useful outside of Vty.
2−module Graphics.Vty.Prelude ( module Graphics.Vty.Prelude
3− , module Control.Applicative
4− , module Control.Monad
5− )
2+module Graphics.Vty.Prelude
3+ ( module Graphics.Vty.Prelude
4+ , module Control.Applicative
5+ , module Control.Monad
6+ )
67where
78
89import Control.Applicative hiding ((<|>))
src/Graphics/Vty/Span.hs+12−14
@@ -2,20 +2,18 @@
22{-# LANGUAGE BangPatterns #-}
33{-# LANGUAGE NamedFieldPuns #-}
44{-# LANGUAGE GADTs #-}
5−{- | A picture is translated into a sequences of state changes and
6− - character spans. State changes are currently limited to new attribute
7− - values. The attribute is applied to all following spans. Including
8− - spans of the next row. The nth element of the sequence represents the
9− - nth row (from top to bottom) of the picture to render.
10− -
11− - A span op sequence will be defined for all rows and columns (and no
12− - more) of the region provided with the picture to `spansForPic`.
13− -
14− - todo: Partition attribute changes into multiple categories according
15− - to the serialized representation of the various attributes.
16− -}
17−module Graphics.Vty.Span
18− where
5+-- | A picture is translated into a sequences of state changes and
6+-- character spans. State changes are currently limited to new attribute
7+-- values. The attribute is applied to all following spans. Including
8+-- spans of the next row. The nth element of the sequence represents the
9+-- nth row (from top to bottom) of the picture to render.
10+--
11+-- A span op sequence will be defined for all rows and columns (and no
12+-- more) of the region provided with the picture to `spansForPic`.
13+--
14+-- todo: Partition attribute changes into multiple categories according
15+-- to the serialized representation of the various attributes.
16+module Graphics.Vty.Span where
1917
2018import Graphics.Vty.Prelude
2119
test/BenchRenderChar.hs+4−4
@@ -1,7 +1,7 @@
1−{- benchmarks composing images using the renderChar operation.
2− - This is what Yi uses in Yi.UI.Vty.drawText. Ideally a sequence of renderChar images horizontally
3− - composed should provide no worse performance than a fill render op.
4− -}
1+-- benchmarks composing images using the renderChar operation. This is
2+-- what Yi uses in Yi.UI.Vty.drawText. Ideally a sequence of renderChar
3+-- images horizontally composed should provide no worse performance than
4+-- a fill render op.
55module BenchRenderChar where
66
77import Graphics.Vty
test/HereDoc.hs+2−4
@@ -1,8 +1,7 @@
11{-# LANGUAGE QuasiQuotes #-}
22{-# LANGUAGE TemplateHaskell #-}
3−{- From http://www.reddit.com/r/haskell/comments/8ereh/a_here_document_syntax/
4− - copyright unknown?
5− -}
3+-- From http://www.reddit.com/r/haskell/comments/8ereh/a_here_document_syntax/
4+-- copyright unknown?
65module HereDoc (heredoc) where
76
87import Language.Haskell.TH.Quote
@@ -11,4 +10,3 @@ import Language.Haskell.TH.Lib
1110
1211heredoc :: QuasiQuoter
1312heredoc = QuasiQuoter (litE . stringL) (litP . stringL) undefined undefined
14−
test/Issue18.hs+1−2
@@ -1,5 +1,4 @@
1−module Main
2− where
1+module Main where
32
43import Graphics.Vty
54import Graphics.Vty.Debug
test/Test2.hs+1
@@ -1,4 +1,5 @@
11module Main where
2+
23import Graphics.Vty
34
45main = do
test/Verify.hs+18−17
@@ -7,23 +7,24 @@
77{-# LANGUAGE StandaloneDeriving #-}
88{-# LANGUAGE DisambiguateRecordFields #-}
99{-# LANGUAGE NamedFieldPuns #-}
10−module Verify ( module Verify
11− , module Control.Applicative
12− , module Control.DeepSeq
13− , module Control.Exception
14− , module Control.Monad
15− , module Test.QuickCheck
16− , module Test.QuickCheck.Modifiers
17− , module Text.Printf
18− , succeeded
19− , failed
20− , monadicIO
21− , liftIO
22− , liftBool
23− , Test(..)
24− , Prop.Result(..)
25− )
26− where
10+module Verify
11+ ( module Verify
12+ , module Control.Applicative
13+ , module Control.DeepSeq
14+ , module Control.Exception
15+ , module Control.Monad
16+ , module Test.QuickCheck
17+ , module Test.QuickCheck.Modifiers
18+ , module Text.Printf
19+ , succeeded
20+ , failed
21+ , monadicIO
22+ , liftIO
23+ , liftBool
24+ , Test(..)
25+ , Prop.Result(..)
26+ )
27+where
2728
2829import Control.Exception ( bracket, try, SomeException(..) )
2930
test/Verify/Data/Terminfo/Parse.hs+5−4
@@ -1,7 +1,8 @@
1−module Verify.Data.Terminfo.Parse ( module Verify.Data.Terminfo.Parse
2− , module Data.Terminfo.Parse
3− )
4− where
1+module Verify.Data.Terminfo.Parse
2+ ( module Verify.Data.Terminfo.Parse
3+ , module Data.Terminfo.Parse
4+ )
5+where
56
67import Data.Terminfo.Parse
78import Data.Terminfo.Eval
test/Verify/Graphics/Vty/Attributes.hs+5−4
@@ -1,7 +1,8 @@
1−module Verify.Graphics.Vty.Attributes ( module Verify.Graphics.Vty.Attributes
2− , module Graphics.Vty.Attributes
3− )
4− where
1+module Verify.Graphics.Vty.Attributes
2+ ( module Verify.Graphics.Vty.Attributes
3+ , module Graphics.Vty.Attributes
4+ )
5+where
56
67import Graphics.Vty.Attributes
78import Verify
test/Verify/Graphics/Vty/DisplayAttributes.hs+5−5
@@ -1,8 +1,8 @@
1−module Verify.Graphics.Vty.DisplayAttributes ( module Verify.Graphics.Vty.DisplayAttributes
2− , module Graphics.Vty.DisplayAttributes
3− )
4− where
1+module Verify.Graphics.Vty.DisplayAttributes
2+ ( module Verify.Graphics.Vty.DisplayAttributes
3+ , module Graphics.Vty.DisplayAttributes
4+ )
5+where
56
67import Graphics.Vty.DisplayAttributes
78import Verify
8−
test/Verify/Graphics/Vty/Image.hs+5−4
@@ -1,10 +1,11 @@
11{-# LANGUAGE BangPatterns #-}
22{-# LANGUAGE NamedFieldPuns #-}
33{-# LANGUAGE DisambiguateRecordFields #-}
4−module Verify.Graphics.Vty.Image ( module Verify.Graphics.Vty.Image
5− , module Graphics.Vty.Image
6− )
7− where
4+module Verify.Graphics.Vty.Image
5+ ( module Verify.Graphics.Vty.Image
6+ , module Graphics.Vty.Image
7+ )
8+where
89
910import Verify.Graphics.Vty.Attributes
1011import Graphics.Vty.Image
test/Verify/Graphics/Vty/Picture.hs+5−4
@@ -1,8 +1,9 @@
11{-# LANGUAGE DisambiguateRecordFields #-}
2−module Verify.Graphics.Vty.Picture ( module Verify.Graphics.Vty.Picture
3− , module Graphics.Vty.Picture
4− )
5− where
2+module Verify.Graphics.Vty.Picture
3+ ( module Verify.Graphics.Vty.Picture
4+ , module Graphics.Vty.Picture
5+ )
6+where
67
78import Verify.Graphics.Vty.Prelude
89
test/Verify/Graphics/Vty/Prelude.hs+6−5
@@ -1,8 +1,9 @@
1−module Verify.Graphics.Vty.Prelude ( module Verify.Graphics.Vty.Prelude
2− , module Graphics.Vty.Prelude
3− , MockWindow(..)
4− )
5− where
1+module Verify.Graphics.Vty.Prelude
2+ ( module Verify.Graphics.Vty.Prelude
3+ , module Graphics.Vty.Prelude
4+ , MockWindow(..)
5+ )
6+where
67
78import Graphics.Vty.Prelude
89
test/Verify/Graphics/Vty/Span.hs+5−4
@@ -1,8 +1,9 @@
11{-# LANGUAGE FlexibleInstances #-}
2−module Verify.Graphics.Vty.Span ( module Verify.Graphics.Vty.Span
3− , module Graphics.Vty.Span
4− )
5− where
2+module Verify.Graphics.Vty.Span
3+ ( module Verify.Graphics.Vty.Span
4+ , module Graphics.Vty.Span
5+ )
6+where
67
78import Graphics.Vty.Debug
89import Graphics.Vty.Span
test/VerifyOutput.hs+4−4
@@ -1,8 +1,8 @@
1−{- We setup the environment to envoke certain terminals of interest.
2− - This assumes appropriate definitions exist in the current environment
3− - for the terminals of interest.
4− -}
1+-- We setup the environment to envoke certain terminals of interest.
2+-- This assumes appropriate definitions exist in the current environment
3+-- for the terminals of interest.
54module VerifyOutput where
5+
66import Verify
77
88import Graphics.Vty
test/VerifyUsingMockInput.hs+2−3
@@ -1,8 +1,7 @@
11{-# LANGUAGE MultiParamTypeClasses #-}
22{-# LANGUAGE FlexibleInstances #-}
3−{- Generate some input bytes and delays between blocks of input bytes.
4− - Verify the events produced are as expected.
5− -}
3+-- Generate some input bytes and delays between blocks of input bytes.
4+-- Verify the events produced are as expected.
65module Main where
76
87import Verify.Graphics.Vty.Output
test/VerifyUtf8Width.hs+1
@@ -1,4 +1,5 @@
11module VerifyUtf8Width where
2+
23import Verify
34
45import Graphics.Text.Width
test/YiIssue264.hs+1
@@ -1,4 +1,5 @@
11module Main where
2+
23import Graphics.Vty
34import Control.Exception
45