-- | Discards error checking from getLoadAvgSafe. Will raise IO exception on error.
getLoadAvg :: IO LoadAvg
getLoadAvg = (fromMaybe (error "getLoadAvg: an error occured")) `fmap` getLoadAvgSafe
getLoadAvg :: IO LoadAvg
getLoadAvg = (fromMaybe (error "getLoadAvg: an error occured")) `fmap` getLoadAvgSafe
getLoadAvg = (fromMaybe (error "getLoadAvg: an error occured")) `fmap` getLoadAvgSafe