;;;; Set up a named-readtable
(in-package "CL.EXT.DACF.UNIFICATION")

(named-readtables:defreadtable template-readtable
  (:dispatch-macro-char #\# #\t #'|sharp-T-reader|)
  (:merge :common-lisp))