tamaño del archivo en Haskell

Question

Estoy tratando de obtener el tamaño de archivo como Real World Haskell recomienda:

getFileSize :: FilePath -> IO (Maybe Integer) 
getFileSize path = handle (\_ -> return Nothing) 
        $ bracket (openFile path ReadMode) (hClose) (\h -> do size <- hFileSize h 
                     return $ Just size) 

Y me da este error:

Ambiguous type variable `e0' in the constraint: 
    (GHC.Exception.Exception e0) arising from a use of `handle' 
Probable fix: add a type signature that fixes these type variable(s) 
In the expression: handle (\ _ -> return Nothing) 
In the expression: 
    handle (\ _ -> return Nothing) 
    $ bracket 
     (openFile path ReadMode) 
     (hClose) 
     (\ h 
     -> do { size <- hFileSize h; 
        return $ Just size }) 
In an equation for `getFileSize': 
    getFileSize path 
     = handle (\ _ -> return Nothing) 
     $ bracket 
      (openFile path ReadMode) 
      (hClose) 
      (\ h 
      -> do { size <- hFileSize h; 
         return $ Just size }) 

pero no puedo cifra qué está pasando.

Answer 1

Después fui google me resolvió el problema como este:

getFileSize :: FilePath -> IO (Maybe Integer) 
getFileSize path = handle handler 
        $ bracket (openFile path ReadMode) (hClose) (\h -> do size <- hFileSize h 
                     return $ Just size) 
    where 
    handler :: SomeException -> IO (Maybe Integer) 
    handler _ = return Nothing