Am I correct in assuming this program should run 100 secs?

>import Control.Concurrent
>main = do
>     threadDelay 100000

Why do I get the folling result then?
ghc -threaded Main.hs -o delay
time ./delay

real    0m0.104s
user    0m0.001s
sys    0m0.002s

Thanks in advance for all your wonderful comments,
Immanuel