git.iko.soy/vty
on master help sign in
rename Hack to Unsafe plus minor
commit35b159777e44408425a034fccfc163ffc3b8fd98 authorCorey O'Connor <corey@ooyala.com> dateSat 20 Jul 2013, 20:29 (13 years ago) parent42768e8
7 files changed+14−23
compare with master
unifiedsplit
src/Graphics/Vty/Image/Internal.hs+1−1 src/Graphics/Vty/Inline.hs+1−1 src/Graphics/Vty/Inline/Hack.hs → src/Graphics/Vty/Inline/Unsafe.hs+1−1 test/benchmark.hs+2−2 test/current_benchmark_results.txt+8−17 test/interactive_terminal_test vty.cabal+1−1
src/Graphics/Vty/Image/Internal.hs+1−1
@@ -33,7 +33,7 @@ data Image =
3333 }
3434 -- | A horizontal join can be constructed between any two images. However a HorizJoin instance is
3535 -- required to be between two images of equal height. The horiz_join constructor adds background
36− -- filles to the provided images that assure this is true for the HorizJoin value produced.
36+ -- fills to the provided images that assure this is true for the HorizJoin value produced.
3737 | HorizJoin
3838 { part_left :: Image
3939 , part_right :: Image
src/Graphics/Vty/Inline.hs+1−1
@@ -31,7 +31,7 @@ module Graphics.Vty.Inline ( module Graphics.Vty.Inline
3131
3232import Graphics.Vty.Attributes
3333import Graphics.Vty.DisplayAttributes
34−import Graphics.Vty.Inline.Hack
34+import Graphics.Vty.Inline.Unsafe
3535import Graphics.Vty.Terminal.Interface
3636import Graphics.Vty.Terminal
3737
src/Graphics/Vty/Inline/Hack.hs → src/Graphics/Vty/Inline/Unsafe.hsrenamed+1−1
@@ -1,4 +1,4 @@
1−module Graphics.Vty.Inline.Hack where
1+module Graphics.Vty.Inline.Unsafe where
22
33import Graphics.Vty.Terminal.Interface (Terminal)
44
test/benchmark.hs+2−2
@@ -32,10 +32,10 @@ main = do
3232 ["-h" ] -> help
3333 _ -> do
3434 let args' = if args /= []
35− then args
35+ then map (drop 2) args
3636 else map fst benches
3737 -- drop the dash-dash "--"
38− results <- forM args' $ \(_ : _ : b_name) -> do
38+ results <- forM args' $ \b_name -> do
3939 case lookup b_name benches of
4040 Just b -> bench b_name b
4141 Nothing -> fail $ "No benchmark named " ++ b_name
test/current_benchmark_results.txt+8−17
@@ -1,20 +1,11 @@
1−pre-release 5.0
1+no unclipped opt 5.0
2+on toast
23[("no-diff-opt-0",147,8),("render-char-0",332,18),("render-char-1",277,16),("vertical-scroll-0",1503,61),("image-fuzz-0",46,3)]
34[("no-diff-opt-0",137,11),("render-char-0",470,18),("render-char-1",254,18),("vertical-scroll-0",1240,56),("image-fuzz-0",46,3)]
4−release 4.7
5−starting no-diff-opt-0
6−user time: 226
7−system time: 13
8−starting render-char-0
9−user time: 411
10−system time: 22
11−starting render-char-1
12−user time: 386
13−system time: 21
14−starting vertical-scroll-0
15−user time: 1930
16−system time: 96
17−starting image-fuzz-0
18−user time: 1225
19−system time: 52
5+
6+on ooyala
7+pre unclipped opt
8+[("no-diff-opt-0",24,3),("render-char-0",102,8),("render-char-1",41,4),("vertical-scroll-0",226,24),("image-fuzz-0",17,1)]
9+
10+release 4.7 on toast
2011[("no-diff-opt-0",226,13),("render-char-0",411,22),("render-char-1",386,21),("vertical-scroll-0",1930,96),("image-fuzz-0",1225,52)]
test/interactive_terminal_testnew file

Binary file not shown.

vty.cabal+1−1
@@ -58,6 +58,7 @@ library
5858 Graphics.Vty.Error
5959 Graphics.Vty.Image
6060 Graphics.Vty.Inline
61+ Graphics.Vty.Inline.Unsafe
6162 Graphics.Vty.LLInput
6263 Graphics.Vty.Picture
6364 Graphics.Vty.Terminal
@@ -79,7 +80,6 @@ library
7980 Graphics.Vty.Terminal.XTermColor
8081 Graphics.Vty.Terminal.TerminfoBased
8182
82− other-modules: Graphics.Vty.Inline.Hack
8383
8484 c-sources: cbits/gwinsz.c
8585 cbits/set_term_timing.c