[Haskell-cafe] getErrorStatus in HXT