From d56d22036c23278881cf72d89cf41d047247b0a5 Mon Sep 17 00:00:00 2001 From: hasufell Date: Sun, 26 Oct 2014 04:29:49 +0100 Subject: [PATCH] QEX: rm unused function --- QueueEx.hs | 5 ----- 1 file changed, 5 deletions(-) diff --git a/QueueEx.hs b/QueueEx.hs index 1446204..d590ccc 100644 --- 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