From a759b18abc4decd0fb03b41cee72dbe1f3ee6436 Mon Sep 17 00:00:00 2001 From: jgart Date: Wed, 2 Feb 2022 00:36:23 -0500 Subject: lisp: tips-and-tricks: defining a scheme sexp comment with a reader macro --- topics/lisp/tips-and-tricks.scm | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 topics/lisp/tips-and-tricks.scm diff --git a/topics/lisp/tips-and-tricks.scm b/topics/lisp/tips-and-tricks.scm new file mode 100644 index 0000000..792980b --- /dev/null +++ b/topics/lisp/tips-and-tricks.scm @@ -0,0 +1,16 @@ +# Defining a scheme sexp comment with a reader macro + +=> http://clhs.lisp.se/Body/f_set__1.htm SET-DISPATCH-MACRO-CHARACTER + +``` +CL-USER(1): (set-dispatch-macro-character #\# #\; (lambda (s c n) c n (read s t nil t) (values))) + +CL-USER(2): (+ 3 (+ 2 3) 1) + +9 +CL-USER(3): (+ 3 #;(+ 2 3) 1) + +4 +``` + +Special thanks to Ed Langley on #common-lisp:matrix.org. -- cgit v1.2.3