summaryrefslogtreecommitdiff
path: root/tests/ssub.bth
blob: 4c69a288647c4ef627b4999a02350beaf06dda06 (plain)
1
2
3
4
5
6
7
8
(defn (f n h) (say (ssub? n h)))
(f 'ee 'needle)
(f 'l 'flucloxacillin)
(f 'l 'fucoxaciin)
(f "really really long thethethethe" "h")
(f 'start "start the at")
(f 'end "at the end")
(f 'entire 'entire)