From 3c8835eb7b7bdbed4a81a1448064327d4e115748 Mon Sep 17 00:00:00 2001 From: John Lorentzson Date: Thu, 22 May 2025 12:19:54 +0200 Subject: [PATCH] Make references able to hold a name --- wip-duuqnd/user-side-compiler/reference.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/wip-duuqnd/user-side-compiler/reference.lisp b/wip-duuqnd/user-side-compiler/reference.lisp index 302eb10..eb8e42c 100644 --- 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))