[GHC] #14122: Core lint error while compiling GHC.IO.Handle

[GHC]

#14122: Core lint error while compiling GHC.IO.Handle
-------------------------------------+-------------------------------------
           Reporter:  bgamari        |             Owner:  (none)
               Type:  bug            |            Status:  new
           Priority:  normal         |         Milestone:  8.4.1
          Component:  Compiler       |           Version:  8.2.1
           Keywords:                 |  Operating System:  Unknown/Multiple
       Architecture:                 |   Type of failure:  None/Unknown
  Unknown/Multiple                   |
          Test Case:                 |        Blocked By:
           Blocking:                 |   Related Tickets:
Differential Rev(s):                 |         Wiki Page:
-------------------------------------+-------------------------------------
 While compiling `GHC.IO.Handle` with `-g3 -dcore-lint -O` I encountered
 the following,
 {{{
 *** Core Lint errors : in result of Simplifier ***
 <no location info>: warning:
     [RHS of w1_s8qY :: Addr#]
     Recursive or top-level binder has strict demand info: w1_s8qY
     Binder's demand info: <L,U>
 }}}

 The binding in question is,
 {{{#!hs
 w1_s8qY :: Addr#
 [LclId,
  Unf=Unf{Src=<vanilla>, TopLvl=False, Value=True, ConLike=True,
          WorkFree=True, Expandable=True, Guidance=IF_ARGS [] 20 0}]
 w1_s8qY
   = src<libraries/base/GHC/IO/Handle.hs:745:37-50>
     src<libraries/base/GHC/IO/Handle.hs:739:9-10> "}"#
 }}}

-- 
Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/14122>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler