[CDEC-432] Satisfy hlint

Michael Hueschen · Michael Hueschen · commit 50ef0e11d84b · 2018-07-12T19:38:28.000-04:00
diff --git a/core/examples/abuse/Main.hs b/core/examples/abuse/Main.hs
@@ -52,7 +52,7 @@ payloadSize :: Integral a => a
 payloadSize = 2^24
 
 payload :: ByteString
-payload = fromString (take payloadSize (repeat '0'))
+payload = fromString (replicate payloadSize '0')
 
 main :: IO ()
 main = do
