trapError :: (Either LispError String) -> Either LispError String
trapError action = catchError action (return . show)
trapError :: (Either LispError String) -> Either LispError String
trapError action = catchError action (return . show)
trapError action = catchError action (return . show)