diff --git a/wip-duuqnd/user-side-compiler/backend/code-generator.lisp b/wip-duuqnd/user-side-compiler/backend/code-generator.lisp index 7aed794..c6881f7 100644 --- a/wip-duuqnd/user-side-compiler/backend/code-generator.lisp +++ b/wip-duuqnd/user-side-compiler/backend/code-generator.lisp @@ -2,11 +2,11 @@ (defclass asm-object () ((%source :accessor source :initarg :source :initform nil) - (%next :accessor next :initform nil))) + (%next :accessor next :initform nil) + (%address :accessor address :initform nil))) (defclass asm-label (asm-object) - ((%name :accessor name :initarg :name) - (%address :accessor address :initform nil))) + ((%name :accessor name :initarg :name))) (defclass asm-instruction (asm-object) ((%opcode :accessor opcode :initarg :opcode)