From d39ccc1403762b19b9966493342867b115294a2e Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sat, 20 Mar 2021 12:39:58 -0700 Subject: add and use :CONSFIGURATOR named readtable Signed-off-by: Sean Whitton --- src/reader.lisp | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 src/reader.lisp (limited to 'src/reader.lisp') diff --git a/src/reader.lisp b/src/reader.lisp new file mode 100644 index 0000000..39314be --- /dev/null +++ b/src/reader.lisp @@ -0,0 +1,23 @@ +;;; Consfigurator -- Lisp declarative configuration management system + +;;; Copyright (C) 2021 Sean Whitton + +;;; This file is free software; you can redistribute it and/or modify +;;; it under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3, or (at your option) +;;; any later version. + +;;; This file is distributed in the hope that it will be useful, +;;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. + +;;; You should have received a copy of the GNU General Public License +;;; along with this program. If not, see . + +(in-package :consfigurator) + +(named-readtables:defreadtable :consfigurator + (:merge :standard) + (:dispatch-macro-char #\# #\? #'cl-interpol:interpol-reader) + (:dispatch-macro-char #\# #\> #'cl-heredoc:read-heredoc)) -- cgit v1.2.3