호출 함수 결과 값으로 리스트를 변수에 저장하기

(defun KM:getcotxt ( / cotxtls ss n nls newln estr jt)
(setq cotxtls '() sortY '())
(setq _P1 (getpoint) _P2 (getpoint))
(setq ss (ssget "_W" _P1 _P2 '((0 . "TEXT"))))
(setq cotxtls (KM:cotxtS ss))
(princ cotxtls)  ;; 중요!! 반드시 마지막에 (princ 변수값) 프린씨 할 것. (princ cotxtls)(princ) 하지말 것.
)

(defun 
(setq costrls '()) ;; 변수에 빈 리스트 미리 할당.!!
(setq costrls (KM:getcotxt)) ;; 함수호출 결과값이 리스트인 경우 변수에 리스트 선언이 선행되어야 함.
;;...
)