diff --git a/wip-duuqnd/user-side-compiler/high-level.lisp b/wip-duuqnd/user-side-compiler/high-level.lisp
index f20f9b1..1d7285b 100644
--- a/wip-duuqnd/user-side-compiler/high-level.lisp
+++ b/wip-duuqnd/user-side-compiler/high-level.lisp
@@ -33,7 +33,8 @@
 (defclass node ()
   ((%next :accessor next :accessor normal-next :initform nil
           :initarg :next)
-   (%source :accessor source :initarg :source :initform nil)))
+   (%source :accessor source :initarg :source :initform nil)
+   (%comment :accessor comment :initarg :comment :initform nil)))
 
 (defmethod generate-code :before ((node node))
   (produce-comment (format nil "~A" node)))