twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-08-05 14:41:54 -07:00
Code Issues Packages Projects Releases Wiki Activity

Use Haskell '98 data declaration rather than GADT-style

Browse Source
This commit is contained in:
Spencer Janssen
2007-06-14 20:52:11 +00:00
parent 3d8e47448f
commit c8bfda92a7
1 changed files with 1 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Mosaic.hs
View File

@@ -323,9 +323,7 @@ otherDirection :: CutDirection -> CutDirection
otherDirection Vertical = Horizontal otherDirection Vertical = Horizontal
otherDirection Horizontal = Vertical otherDirection Horizontal = Vertical
data Mosaic a where data Mosaic a = M [Mosaic a] | OM a
M :: [Mosaic a] -> Mosaic a
OM :: a -> Mosaic a
deriving ( Show ) deriving ( Show )
instance Functor Mosaic where instance Functor Mosaic where