I'm using Windows 7 32bit Host OS(ghc 6.8.3) and Virtualbox Archlinux Guest OS(ghc 6.8.4)

I feel that ghci code executing speed in guest os is 1.5~2x faster than host os

The code:
let t n = do {if n `mod` 100000 == 0 then print n else return ()} >> t (n+1)
t 1

any clue?