Most importantly: Only append to the current bytestring if the bytestring returned by hGetNonBlocking is not empty. Otherwise, on every iteration of the loop, a new thunk appending "" to the current bytestring gets wrapped around, resulting in a crazy number of thunks. (think: ((...) <> "") <> "")
Most importantly: Only append to the current bytestring if the bytestring returned by
hGetNonBlocking
is not empty. Otherwise, on every iteration of the loop, a new thunk appending "" to the current bytestring gets wrapped around, resulting in a crazy number of thunks. (think:((...) <> "") <> ""
)Fixes #28