Any idea was the atomically# mean in the following code?

atomically :: STM a -> IO a
atomically (STM m) = IO (\s -> (atomically# m) s )

Code is from GHC.Conc module http://www.haskell.org/ghc/docs/6.6/html/libraries/base/GHC-Conc.html

daryoush