summaryrefslogtreecommitdiffstats
path: root/StackSet.hs
diff options
context:
space:
mode:
authorAlec Berryman <alec@thened.net>2007-04-01 16:45:39 +0200
committerAlec Berryman <alec@thened.net>2007-04-01 16:45:39 +0200
commit8a61f217d69bb13612c6dc6d0c6359dcad1e13e0 (patch)
treea77de4957c9a593ea6901fac3cc3ebb5025c952b /StackSet.hs
parent8a147c242d91248d6c7e9e8629021f9bffacb41e (diff)
downloadmetatile-8a61f217d69bb13612c6dc6d0c6359dcad1e13e0.tar
metatile-8a61f217d69bb13612c6dc6d0c6359dcad1e13e0.zip
Remove trailing spaces, no content changed
darcs-hash:20070401144539-39448-1903870c5ef75cc918a8ea3153c5b154feb4e644
Diffstat (limited to 'StackSet.hs')
-rw-r--r--StackSet.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/StackSet.hs b/StackSet.hs
index 2fc8020..bcea8c8 100644
--- a/StackSet.hs
+++ b/StackSet.hs
@@ -3,7 +3,7 @@
-- Module : StackSet
-- Copyright : (c) Don Stewart 2007
-- License : BSD3-style (see LICENSE)
---
+--
-- Maintainer : dons@cse.unsw.edu.au
-- Stability : stable
-- Portability : portable, needs GHC 6.6
@@ -89,7 +89,7 @@ fromList (o,xs) = view o $ foldr (\(i,ys) s ->
toList :: StackSet a -> (Int,[[a]])
toList x = (current x, map snd $ M.toList (stacks x))
--- | Push. Insert an element onto the top of the current stack.
+-- | Push. Insert an element onto the top of the current stack.
-- If the element is already in the current stack, it is moved to the top.
-- If the element is managed on another stack, it is removed from that
-- stack first.