base: Add bangs to GHC.IO.Handle.Text hGet* functions
authorBen Gamari <bgamari.foss@gmail.com>
Mon, 17 Sep 2018 14:46:26 +0000 (16:46 +0200)
committerKrzysztof Gogolewski <krz.gogolewski@gmail.com>
Mon, 17 Sep 2018 14:46:26 +0000 (16:46 +0200)
commit88130dbe948eaa7f76cf237d8aba17b41fac4904
tree4c0f2fda003ebacd820399c8958e1a8730b9537f
parentd1c2f298870dbce29758243da54d2e29dd83246b
base: Add bangs to GHC.IO.Handle.Text hGet* functions

Summary:
I believe that demand analysis doesn't notice that these are morally strict in
the pointer argument due to the `count == 0` special case. Fixes #15638.

Test Plan: Validate

Reviewers: andrewthad, hvr

Reviewed By: andrewthad

Subscribers: rwbarton, carter

GHC Trac Issues: #15638

Differential Revision: https://phabricator.haskell.org/D5149
libraries/base/GHC/IO/Handle/Text.hs