Anonymous user
Best shuffle: Difference between revisions
m
→Nondeterministic Conduit-based solution
Line 1,730:
The main goal of streaming solution is to be able to process data from any resources, so let's use it to shuffle texts being transferred from <tt>stdin</tt> to <tt>stdout</tt>.
Additional imports
<lang Haskell>import Data.ByteString.Builder (charUtf8)
import Data.ByteString.Char8 (ByteString, unpack, pack)
import Data.Conduit.ByteString.Builder (builderToByteString)
import System.IO (stdin, stdout)</lang>
<lang Haskell>
shuffleBS :: Int -> ByteString -> IO ByteString
shuffleBS n s =
| |||