pred.clj: add empty?

1 files changed, 5 insertions, 0 deletions

diff --git a/pred.clj b/pred.clj
index 6518db2b..99e2b715 100644
--- a/pred.clj
+++ b/pred.clj
@@ -101,3 +101,8 @@
   "Returns true if x is odd, throws an exception if x is not an integer"
   [x]
   (not (even? x)))
+
+(defn empty?
+  "Returns true if coll is empty"
+  [coll]
+  (not (seq coll)))