diff options
Diffstat (limited to 'lib/sasl.ml')
| -rw-r--r-- | lib/sasl.ml | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/sasl.ml b/lib/sasl.ml index 1fcd661..f5a5ae0 100644 --- a/lib/sasl.ml +++ b/lib/sasl.ml @@ -12,6 +12,10 @@ type sasl_error = | NotAuthorized | MalformedRequest +let unrecoverable = function + | NotAuthorized -> true + | _ -> false + let parse_sasl_error = function | "not-authorized" -> NotAuthorized | "malformed-request" -> MalformedRequest |