Another comment

This commit is contained in:
BirDt_ 2026-03-27 16:17:00 +08:00
parent cf72a7983f
commit f9b419109a

View file

@ -19,6 +19,7 @@
(let ((component-type (rtd-name (record-rtd component))))
(if (hash-table-exists? component-sets component-type)
(let ((component-set (hash-table-ref component-sets component-type)))
;; TODO: this could be nicer with set-adjoin! but I'm not sure if hash-table-ref is locative
(hash-table-set! component-sets
component-type
(set-adjoin component-set