diff --git a/wip-duuqnd/user-side-compiler/asm-function.lisp b/wip-duuqnd/user-side-compiler/asm-function.lisp
index 51d601b..623a096 100644
--- a/wip-duuqnd/user-side-compiler/asm-function.lisp
+++ b/wip-duuqnd/user-side-compiler/asm-function.lisp
@@ -3,7 +3,9 @@
 (defvar *asm-functions* (make-hash-table :test #'equalp))
 
 (defclass asm-function ()
-  ((%name :accessor name :initarg :name)))
+  ((%name :accessor name :initarg :name)
+   (%address :accessor address :initarg :address
+             :initform #xFEC0)))
 
 (define-transformation (token (token-name asm-function))
   (multiple-value-bind (asm-function existsp)