From 20da5b57de2c00e7f89b158cb775fadcc12439b2 Mon Sep 17 00:00:00 2001
From: inoas <mail@inoas.com>
Date: Sat, 25 Jun 2022 19:19:55 +0200
Subject: short circuit List.any recursion

---
 src/gleam/list.gleam | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src')

diff --git a/src/gleam/list.gleam b/src/gleam/list.gleam
index 50c7565..3c73a56 100644
--- a/src/gleam/list.gleam
+++ b/src/gleam/list.gleam
@@ -839,6 +839,7 @@ fn any_tail_recursive(
   accumulator: Bool,
 ) -> Bool {
   case list {
+    _ if accumulator == True -> True
     [] -> accumulator
     [x, ..rest] ->
       any_tail_recursive(rest, predicate, accumulator || predicate(x))
-- 
cgit v1.2.3