add basic empty_image test
Ignore-this: ad4af1ae06455cd9a375d98cda4732ec
darcs-hash:20090906024946-f0a0d-f53090841bda6a957a0dc163ac9ef277dd52d38c.gz
commit3acd7121c3566cf9bf9a318ec1e14a82cb9424f2
authorcoreyoconnor <coreyoconnor@gmail.com>
dateSat 5 Sep 2009, 19:49 (17 years ago)
parentf66f30b
test/verify_empty_image_props.hsnew file+13
@@ -0,0 +1,13 @@
1+{-# LANGUAGE ScopedTypeVariables #-}
2+module Main where
3+
4+import Verify
5+
6+-- should be exported by Graphics.Vty.Picture
7+import Graphics.Vty.Picture ( Image, empty_image )
8+
9+main = run_test $ do
10+ -- should provide an image type.
11+ let _ :: Image = empty_image
12+ return ()
13+