From 45935f84e0fad864d5738fd2d8dcfad65e2675a8 Mon Sep 17 00:00:00 2001 From: Thayne McCombs Date: Sun, 20 Jul 2014 23:34:32 -0600 Subject: [PATCH] Update README --- README.markdown | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/README.markdown b/README.markdown index 28a4bb3..6bcb945 100644 --- a/README.markdown +++ b/README.markdown @@ -50,12 +50,12 @@ Here is an example: ;; Define cl-interpol syntax (defsyntax interpol-syntax - (:dispatch-macro-character #\# #\? #'cl-interpol::interpol-reader)) + (:dispatch-macro-char #\# #\? #'cl-interpol::interpol-reader)) This code is equivalent to: - (defvar interpol-syntax - `((:dispatch-macro-character #\# #\? ,#'cl-interpol::interpol-reader))) + (named-readtables:defreadtable interpol-syntax + `((:dispatch-macro-char #\# #\? ,#'cl-interpol::interpol-reader))) If you don't want to use `defsyntax` in some reasons, use this code instead.