;;;; $Id$
;;;;
;;;; This file, part of UMLisp, is
-;;;; Copyright (c) 2000-2004 by Kevin M. Rosenberg, M.D.
+;;;; Copyright (c) 2000-2006 by Kevin M. Rosenberg, M.D.
;;;;
;;;; UMLisp users are granted the rights to distribute and use this software
;;;; as governed by the terms of the GNU General Public License.
(code :value-type string :initarg :code :reader code)
(cxn :value-type fixnum :initarg :cxn :reader cxn)
(cxl :value-type string :initarg :cxl :reader cxl)
- (rnk :value-type string :initarg :rnk :reader rnk)
+ (rank :value-type string :initarg :rank :reader rank)
(cxs :value-type cdata :initarg :cxs :reader cxs)
(cui2 :value-type fixnum :initarg :cui2 :reader cui2 :hyperlink find-ucon-cui
:print-formatter fmt-cui)