スレッドコードの名前を変更するためのマクロが動作しません。

Question

私は '〜'コードではなく 'thr'という名前のスレッドマクロを呼び出せるマクロを作成しようとしています。私は試した：

(require threading) 
(define-syntax-rule (thr body ...) 
    (require threading) 
    (~> body ...)) 

(thr " checking " string-trim println) 

しかし、それは動作しません。エラーは次のとおりです。

define-syntax-rule: too many forms in: (~> body) 

私はまた、唯一の1つの本体なステートメントを試みたが、まだそれが動作しません：

(define-syntax-rule (thr2 body) 
    (require threading) 
    (~> body)) 

Answer 1

ラケットでこれを行うための最短の方法は次のとおりです。

(define-syntax thr (make-rename-transformer #'~>))