用的參數無限多拍微距

我想一個宏，可以採取任何數量的參數和返回每個參數列表，像這樣：用的參數無限多拍微距

(TEST first second third) 
=> '(first second third)

2014-01-14 Mathias

像這樣嗎？

(define-syntax-rule (TEST . lst) 
    (quote lst)) 

(TEST first second third) 
=> '(first second third)

或者乾脆

(define-syntax-rule (TEST . lst) 
    'lst)

2014-01-14 22:54:17 uselpa

那麼很容易。謝謝你，先生。我可以接受你的答案（在7分鐘內）。 – Mathias

是的，如你所見，沒有真正需要宏; '（引號（第一個三分之一））'和'（TEST first second third）'相同。 – uselpa

是的，我看到了，但是在這種特殊情況下，我需要'TEST' ... – Mathias

這裏的另一種方式，用define-syntax：

(define-syntax TEST 
    (syntax-rules() 
    ((_ . lst) 'lst)))

當然你也可以直接引用的表情，真的是沒有必要在這裏使用宏：

'(first second third)

2014-01-14 23:01:24

回答