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.