Make references able to hold a name

2025-05-22 12:19:54 +02:00 · 2025-05-22 12:19:54 +02:00 · 3c8835eb7b
commit 3c8835eb7b
parent 7639263bed
1 changed files with 2 additions and 1 deletions
--- a/wip-duuqnd/user-side-compiler/reference.lisp
+++ b/wip-duuqnd/user-side-compiler/reference.lisp
@ -1,6 +1,7 @@
 (in-package #:user-side-compiler)

-(defclass reference () ())
+(defclass reference ()
+  ((%name :accessor name :initarg :name)))

 (defgeneric ref-constantp (reference) (:method (reference) nil))