lib/string.fnl


1
2
3
4
5
6
7
8
9
10
11

(fn split [string]
  (accumulate [res [] v _
               (string:gmatch "%S+")]
    (do
      (table.insert res v)
      res)))

(fn ends-with [string end]
  (= (string.sub string (- (# end))) end))

{: split : ends-with}