From 184b25466cf1088d521ba61a538f17ad25520f54 Mon Sep 17 00:00:00 2001 From: paku Date: Mon, 27 May 2024 19:23:39 +0900 Subject: [PATCH] Delete *builtin-elements* --- src/builtin.lisp | 3 --- 1 file changed, 3 deletions(-) diff --git a/src/builtin.lisp b/src/builtin.lisp index cd56a85..c455f41 100644 --- a/src/builtin.lisp +++ b/src/builtin.lisp @@ -6,13 +6,10 @@ #:defhsx)) (in-package #:hsx/builtin) -(defparameter *builtin-elements* (make-hash-table)) - (defmacro define-and-export-builtin-elements (&rest names) `(progn ,@(mapcan (lambda (name) (list `(defhsx ,name ,(string-downcase name)) - `(setf (gethash (make-keyword ',name) *builtin-elements*) t) `(export ',name))) names)))