[GHC] #13960: Ticks exhausted with 8.0.2

[GHC]

#13960: Ticks exhausted with 8.0.2
-------------------------------------+-------------------------------------
        Reporter:  tom-bop           |                Owner:  (none)
            Type:  bug               |               Status:  infoneeded
        Priority:  normal            |            Milestone:
       Component:  Compiler          |              Version:  8.0.2
      Resolution:                    |             Keywords:
Operating System:  Unknown/Multiple  |         Architecture:
                                     |  Unknown/Multiple
 Type of failure:  None/Unknown      |            Test Case:
      Blocked By:                    |             Blocking:
 Related Tickets:                    |  Differential Rev(s):
       Wiki Page:                    |
-------------------------------------+-------------------------------------

Comment (by tom-bop):

 I've updated the repro case to not depend on the postgresql-simple
 library:

 Broken.hs:

 {{{
 #!haskell
 {-# LANGUAGE OverloadedStrings #-}

 module Broken (breaks) where

 import Data.ByteString
 import Data.ByteString.Builder
 import Data.ByteString.Lazy (toStrict)
 import Data.String (IsString(..))

 newtype Query = Query ByteString

 toByteString :: Builder -> ByteString
 toByteString x = toStrict (toLazyByteString x)

 instance IsString Query where
    fromString = Query . toByteString . stringUtf8

 breaks :: [(Query, Query)]
 breaks = [
     ("query", "query")
   , ("query", "query")
   , ("query", "query")
   , ("query", "query")
   , ("query", "query")
   , ("query", "query")
   , ("query", "query")
   , ("query", "query")
   , ("query", "query")
   , ("query", "query")
   , ("query", "query")
   ]
 }}}

 broken.cabal:

 {{{
 name:                broken
 version:             0.1.0.0
 build-type:          Simple
 cabal-version:       >=1.10

 library
   exposed-modules:
     Broken
   other-extensions:
       OverloadedStrings
   build-depends:
       base
     , bytestring
     , bytestring-builder
   default-language:    Haskell2010
 }}}

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