From e5feea5a7fd246c6a2bd47ff86beecd48d7b9040 Mon Sep 17 00:00:00 2001 From: PHO Date: Wed, 5 Jan 2011 00:29:57 +0900 Subject: [PATCH] fix a bug in put :: BlockFlags -> Put --- Codec/Audio/WavPack/Block.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/Codec/Audio/WavPack/Block.hs b/Codec/Audio/WavPack/Block.hs index ac3ef80..db52706 100644 --- a/Codec/Audio/WavPack/Block.hs +++ b/Codec/Audio/WavPack/Block.hs @@ -141,7 +141,6 @@ instance Binary BlockFlags where putNBits 5 $ bfLeftShift bf putBit $ bfFinalBlock bf putBit $ bfInitialBlock bf - putBit $ bfFinalBlock bf putBit $ bfHybridBalance bf putBit $ bfHybridBitrate bf putBit $ bfExtendedInt bf -- 2.40.0