內置不區分大小寫的字符串=

Question

我需要比較兩個字符串，忽略assoc:test函數的情況。我知道，我可以很容易地編寫函數像這樣：

(defun cistring= (str1 str2) 
    (string= (string-downcase str1) 
      (string-downcase str2))) 

但是我想知道：是否有一個內置的區分大小寫string=？或者我可能找不到任何東西？

Answer 1

STRING-EQUAL比較字符串不區分大小寫（字符是CHAR-EQUAL）。

CL-USER> (string-equal "foo" "FOO") 
T 
CL-USER> (string-equal "foo" "FOOBAR" :end2 3) 
T