-- | A SystemString-aware version of error that adds a usage hint.
usageError :: String -> a
usageError = error' . (++ " (use -h to see usage)")
usageError :: String -> a
usageError = error' . (++ " (use -h to see usage)")
usageError = error' . (++ " (use -h to see usage)")