twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-08-11 02:01:51 -07:00
Code Issues Packages Projects Releases Wiki Activity

explicit interface on StackSet. maybe it should be a seperate package ... ?

Browse Source
This commit is contained in:
Don Stewart
2007-03-09 06:12:55 +00:00
parent 03366b9303
commit 914192cc70
1 changed files with 24 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
StackSet.hs
View File

@@ -19,7 +19,30 @@
-- may be on only 1 screen at any given time.
--
module StackSet {- everything -} where
module StackSet (
StackSet, -- abstract
-- * Introduction and elimination
empty, -- :: Int -> StackSet a
fromList, -- :: Ord a => (Int,[[a]]) -> StackSet a
toList, -- :: StackSet a -> (Int,[[a]])
index, -- :: Int -> StackSet a -> [a]
current, -- :: StackSet a -> Int
-- * Queries
member, -- :: Ord a => a -> StackSet a -> Bool
size, -- :: StackSet a -> Int
peek, -- :: StackSet a -> Maybe a
-- * Modifcations
push, -- :: Ord a => a -> StackSet a -> StackSet a
view, -- :: Int -> StackSet a -> StackSet a
rotate, -- :: Ordering -> StackSet a -> StackSet a
shift, -- :: Ord a => Int -> StackSet a -> StackSet a
insert, -- :: Ord a => a -> Int -> StackSet a -> StackSet a
delete, -- :: Ord a => a -> StackSet a -> StackSet a
) where
import Data.Maybe
import qualified Data.List as L (nub,delete)