인수가 구조 인스턴스 여야하는 함수 호출

Question

다음 코드가 주어지면 함수를 호출하는 구문은 무엇입니까 dist?

(defstruct coord 
    x 
    y) 

(defstruct line 
    (point1 :type coord) 
    (point2 :type coord)) 


(defun dist (point1 point2) 
    (sqrt (+ (square (- (coord-x point1) (coord-x point2))) 
      (square (- (coord-y point1) (coord-y point2)))))) 

(defun square (x) (* x x)) 

Answer 1

Lisp 제품군의 언어에 대한 아름다운 점은 (상대적으로) 일관된 구문입니다. (square n) 또는 *을 (* n1 n2 ...)으로 작성하여 square 함수를 호출하는 것처럼 이라는 두 개의 인수를 취하는 dist을 호출합니다. 문맥 상 이것은 다음과 같은 형태 일 수 있습니다 :

(let ((point1 (make-coord …)) 
     (point2 …)) 
    (dist point1 point2))