diff --git a/variables.lisp b/variables.lisp
index 781482f..c35cc41 100644
--- a/variables.lisp
+++ b/variables.lisp
@@ -4,6 +4,7 @@
 (defvar *variable-alist* '())
 
 (defcomponent variable-form (form)
+  name
   (using-k-once :initform nil :accessor using-k-once-of)
   (previous :initform nil :accessor previous-of))