Common Lisp: Làm việc với các tham số còn lại

Question

Bất cứ ai có thể cho tôi biết cách làm việc với các thông số được lưu trữ trong giá trị được chỉ định bởi & nghỉ ngơi.

Tôi đã đọc rất nhiều và dường như các tác giả chỉ biết cách liệt kê tất cả các tham số như vậy.

(defun test (a &rest b) b) 

Điều này rất thú vị nhưng không thực sự hữu ích.

Điều tốt nhất tôi đã tìm thấy cho đến nay là sử dụng đầu tiên, thứ hai, v.v. để có được thông số bạn đang tìm kiếm.

(defun test (a &rest b) 
    (first b)) 

tôi nhận thấy phương pháp này ngừng hoạt động tại các tham số thứ mười, nhưng đặc điểm kỹ thuật (từ những gì tôi đã đọc) hỗ trợ tối thiểu là 50. Ngay cả khi rất có thể là mỏng mà tôi sẽ sử dụng 50 thông số, tôi muốn biết cách truy cập tất cả.

Cảm ơn

Answer 1

Chức năng truy cập FIRST, SECOND và như vậy là "chỉ" các chức năng tiện ích ở trên cùng của CAR/CDR hoặc NTH. SO, tôi đoán, câu trả lời cho câu hỏi cụ thể của bạn là "sử dụng NTH hoặc ELT" (hoặc xây dựng các hàm acccessor cụ thể của riêng bạn).

Nếu bạn muốn, bạn có thể xác định một thứ XI như:

(defun mười một (danh sách) (thứ n danh sách 10))

tôi thấy, tuy nhiên, tôi chủ yếu sử dụng & luận REST của khi có 0 hoặc nhiều thứ tôi muốn làm gì đó, không thực sự quan tâm đến vị trí cụ thể của một đối số đã cho trong danh sách REST & REST. Điều đó thường đòi hỏi phải sử dụng LOOP, DO hoặc DOLIST để duyệt qua các đối số và làm điều gì đó với mỗi đối số; họ MAP ​​hoặc (thỉnh thoảng) GIẢM.

Answer 2

Thông số còn lại chỉ là một danh sách. Bạn có thể xử lý nó bằng cách sử dụng các hoạt động danh sách bình thường.

(defun test (a &rest b)) 
    (dolist (s b) 
    (when (> s 1) 
     (print s) 
     (do-something-else b))) 

Answer 3

Thực ra chức năng này rất hữu ích. Bạn chỉ phải thử nó.

CL-USER 1 > (defun test (a &rest b) b) 
TEST 

CL-USER 2 > (test 1 2 3 4) 
(2 3 4) 

Vì vậy, bạn thấy rằng B chỉ là danh sách các đối số. Vì vậy, mọi hoạt động danh sách và chuỗi đều được áp dụng. Không có phép thuật gì cả. Có chức năng để truy cập các yếu tố NTH, chức năng để loại bỏ các yếu tố, vv ..

Trong Common Lisp HyperSpec các chức năng có liên quan được liệt kê:

14. The Conses Dictionary

17. The Sequences Dictionary

Đối với một Lisp cơ bản hướng dẫn kiểm tra cuốn sách của Touretzky:

Common Lisp: A Gentle Introduction to Symbolic Computation

Sách có thể tải xuống bằng PDF và Postscript. Nó dạy Basic Lisp cơ bản.

Answer 4

Bạn cũng có thể sử dụng destructuring-ràng buộc:

(defun my-function (&rest arguments) 
    (destructuring-bind (a b &rest c) arguments 
    (format nil "~A,~A followed with ~A" a b c))) 

CL-USER> (my-function 1 2 "Give" 'me "more" 'arguments!!) 
==> "1,2 followed with (Give ME more ARGUMENTS!!)" 

Answer 5

tôi chỉ có một lặp đệ quy để đi qua tất cả, tôi đoán dolist là tốt hơn nhưng tôi thích sử dụng theo cách cũ thời