title: Get Thread name
body: <p>I´m playing with async operator of Haskell and I would like to print the thread name, but I google about it and I cannot find a way to do it.</p>
  
  <p>Here my code</p>
  
  <pre><code>asyncResponse = do
                  resAsync &lt;- async operation
                  response &lt;- wait resAsync
                  print response
  
  operation = do
             threadDelay 5000000
             return "hello async world!!" --&gt; Here Thread name
  </code></pre>