Make SelectCatch() from Sprache available in Superpower about superpower HOT 3 OPEN

p.Catch(e => "some message")

        /// <summary>
        /// Attempts the parser and invokes the exception handler if the parser throws TException.
        /// </summary>
        /// <typeparam name="TKind">The type of tokens consumed by the parser.</typeparam>
        /// <typeparam name="T">The type of the result.</typeparam>
        /// <typeparam name="TException">The type of exception caught and handled by <see cref="Catch{TKind, T, TException}(TokenListParser{TKind, T}, Func{TException, TokenListParserResult{TKind, T}})"/></typeparam>
        /// <param name="parser">The parser.</param>
        /// <param name="exceptionHandler">A function that handles TException and returns a <see cref="TokenListParserResult{TKind, T}"/>.</param>
        /// <returns>A parser that calls the first parser and handles TException by calling the exception handler.</returns>
        /// <exception cref="ArgumentNullException">Thrown if either the parser or the exceptionHandler is null.</exception>
        public static TokenListParser<TKind, T> Catch<TKind, T, TException>(
            this TokenListParser<TKind, T> parser,
            Func<TException, TokenListParserResult<TKind, T>> exceptionHandler)
            where TException : Exception
        {
            if (parser == null) throw new ArgumentNullException(nameof(parser));
            if (exceptionHandler == null) throw new ArgumentNullException(nameof(exceptionHandler));

            return input =>
            {
                try
                {
                    return parser(input);
                }
                catch (TException ex)
                {
                    return exceptionHandler(ex);
                }
            };
        }