summaryrefslogtreecommitdiff
path: root/lib/contains.fnl
diff options
context:
space:
mode:
Diffstat (limited to 'lib/contains.fnl')
-rw-r--r--lib/contains.fnl7
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/contains.fnl b/lib/contains.fnl
new file mode 100644
index 0000000..75275af
--- /dev/null
+++ b/lib/contains.fnl
@@ -0,0 +1,7 @@
+(fn contains [t x]
+ (accumulate [found false
+ _ v (ipairs t)
+ &until found] ; escape early
+ (or found (= x v))))
+
+{: contains}