Làm thế nào để kiểm tra elisp nếu một chuỗi là một chuỗi con của một chuỗi khác?

Làm thế nào để kiểm tra xem một chuỗi s1có phải là một chuỗi con của một chuỗi khác s2không?

Ví dụ (test-substring "f t" "df tj") --> t, (test-substring "ft" "df tj") --> nil.

Cách tiếp cận Lisp tiêu chuẩn của Emacs là khớp biểu thức chính quy:

(string-match-p (regexp-quote needle) haystack)

cl-search có thể làm điều đó (và cũng trả về chỉ mục của chuỗi con, nếu tìm thấy):

ELISP> (cl-search "f t" "df tj")
1 (#o1, #x1, ?\C-a)
ELISP> (cl-search "ft" "df tj")
nil