diff options
author | Brent Yorgey <byorgey@gmail.com> | 2007-10-22 21:26:36 +0200 |
---|---|---|
committer | Brent Yorgey <byorgey@gmail.com> | 2007-10-22 21:26:36 +0200 |
commit | 87c651bc8d7ee1857bafc2a32a1645f87881dd48 (patch) | |
tree | 6dfbae4d9c00f201323d5a7d714ee1fa9982f0ae | |
parent | ff21fcc12b47492a66684ebaec5b7b3955cb3230 (diff) | |
download | metatile-87c651bc8d7ee1857bafc2a32a1645f87881dd48.tar metatile-87c651bc8d7ee1857bafc2a32a1645f87881dd48.zip |
StackSet.hs: remove dead code.
darcs-hash:20071022192636-bd4d7-fa9146ac13ec94ef229c3c24dbb53e1ecc37c271
-rw-r--r-- | StackSet.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/StackSet.hs b/StackSet.hs index 3b23d59..95ff29f 100644 --- a/StackSet.hs +++ b/StackSet.hs @@ -352,8 +352,6 @@ filter p (Stack f ls rs) = case L.filter p (f:rs) of index :: StackSet i l a s sd -> [a] index = with [] integrate --- let is = t : r ++ reverse l in take (length is) (dropWhile (/= m) (cycle is)) - -- | -- /O(1), O(w) on the wrapping case/. -- |