ccall doesn't work

[Joachim Schmid]

In the Online User-documentation I found the following example:

> module GHCmain ( mainPrimIO ) where

> import PreludeGlaST

> mainPrimIO :: PrimIO ()
> mainPrimIO = do
         sleep 5
         _ccall_ printf "%d\n" (14::Int)

> sleep :: Int -> PrimIO ()
> sleep t = _ccall_ sleep t


Compiling this example with ghc-2.02 results to
> GHCMain.hs:10:1: wildcard in expression on input: "sleep"