我需要比较两个字符串,以忽略该assoc :test函数的大小写。我知道我可以像这样轻松编写函数:
(defun cistring= (str1 str2)
(string= (string-downcase str1)
(string-downcase str2)))
Run Code Online (Sandbox Code Playgroud)
但是我想知道:是否有内置的不区分大小写的string=?也许我只是找不到?
STRING-EQUAL不区分大小写地比较字符串(字符为CHAR-EQUAL)。
CL-USER> (string-equal "foo" "FOO")
T
CL-USER> (string-equal "foo" "FOOBAR" :end2 3)
T
Run Code Online (Sandbox Code Playgroud)