QEX: rm unused function

2014-10-26 04:29:49 +01:00
parent c8914c8272
commit d56d22036c
1 changed files with 0 additions and 5 deletions
--- a/QueueEx.hs
+++ b/QueueEx.hs
@@ -21,8 +21,3 @@ shiftQueueRight = (\(b, nq) -> Q.pushFront nq (fromJust b)) <$> Q.popBack
 -- |Convert a Queue back to a list.
 queueToList :: BankersDequeue a -> [a]
 queueToList q = Q.takeFront (Q.length q) q
-
-
-- |Unsafe version of Q.first.
-uQfirst :: BankersDequeue a -> a
-uQfirst = fromJust . Q.first