msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

Comment out some dead code found with -fwarn-unused-binds

Browse Source 
Also fixed some warnings and tightened some imports
This commit is contained in:
hallgren
2015-08-28 13:59:43 +00:00
parent f2952768d5
commit 5bfaf10de5
39 changed files with 122 additions and 116 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/binary/Data/Binary/Put.hs
View File

@@ -61,7 +61,7 @@ import Control.Applicative
------------------------------------------------------------------------
-- XXX Strict in buffer only.
data PairS a = PairS a {-# UNPACK #-}!Builder
data PairS a = PairS a {-UNPACK-}!Builder
sndS :: PairS a -> Builder
sndS (PairS _ b) = b