summary refs log tree commit diff
path: root/lib/contains.test.fnl
blob: 45a00af491533269d6fe5e59f53c0dbbae162dcf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
(let [{: contains } (require :lib.contains)
      {: describe } (require :lib.test)
      {: describe :end test-end} (require :lib.test)
      ]

       (describe "contains()" (fn [t]
                                (t {:given "a list and an element it contains"
                                    :should "returns true"
                                    :expected true
                                    :actual (contains [:apple :orange :pear] :apple)}
                                   )
                                (t {:given "a list and an element it does not contain"
                                    :should "returns false"
                                    :expected false
                                    :actual (contains [:apple :orange :pear] :gorilla)
                                    })
                                (test-end))))