Xác định macro đọc của riêng tôi

Question

Có một số macro đọc trong Common Lisp chẳng hạn như '#'#P, nhưng làm cách nào tôi có thể viết macro đã đọc?

Như thế này:

#T"hello world" 
====================> 
(gettext "hello world") 

Answer 1

Bạn có thể sử dụng set-macro-character và set-dispatch-macro-character, ví dụ sau:

(set-dispatch-macro-character #\# #\T 
    (lambda (s c n) 
    `(gettext ,(read s t nil t)))) 
==> T 

bạn có thể sử dụng các cài đặt đọc cú pháp

(read-from-string "#T\"this is a test\"") 
==> (GETTEXT "this is a test")