0

したがって、文字列を受け取り、それをリストの最初の要素と比較したいのですが、文字列がasdの場合、「asd」とasdを比較するため、機能しません。

(defun test (thistring list) 
 (cond 
  ((null list) nil) 
  ((equal thistring (car(car list))
     (print "ok")))))

前もって感謝します。

4

2 に答える 2

2
CL-USER 42 > (find "foo" '(bar foo baz) :key #'string-downcase :test #'equal)

FOO

于 2012-12-04T17:25:15.067 に答える
0

入力文字列('thisstring')を入力リストの最初の要素('list')と単純に比較したい場合は、これらの行に沿ったものの方が適しています。

(defun test (thistring list) 
  (cond 
    ((null list)
        nil) 
    ((equal thistring (car list))
        (print "ok"))
  )
)
于 2012-12-04T12:21:33.397 に答える