X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/b2983f3591981a916f748362d91ff0e2817552cb..7b7947024fedb0bb7a0ea3ccb0029f6060de901b:/src/classes.lisp

diff --git a/src/classes.lisp b/src/classes.lisp
index 3ed103a..9484141 100644
--- a/src/classes.lisp
+++ b/src/classes.lisp
@@ -331,7 +331,7 @@ (defclass sod-initarg ()
    (location :initarg :location :initform (file-location nil)
 	     :type file-location :reader file-location)
    (name :initarg :name :type string :reader sod-initarg-name)
-   (type :initarg :type :type c-type :reader sod-initarg-type))
+   (%type :initarg :type :type c-type :reader sod-initarg-type))
   (:documentation
    "Describes a keyword argument accepted by the initialization function."))