Update of /project/oct/cvsroot/oct In directory clnet:/tmp/cvs-serv16645

Modified Files: qd-class.lisp Log Message: Add or cleanup some docstrings.

--- /project/oct/cvsroot/oct/qd-class.lisp 2007/10/16 02:39:21 1.29 +++ /project/oct/cvsroot/oct/qd-class.lisp 2008/07/18 17:01:51 1.30 @@ -33,7 +33,8 @@ ((qd :initform +qd-zero+ :reader qd-value :initarg :value - :type %quad-double))) + :type %quad-double)) + (:documentation "QUAD-DOUBLE real number"))

(defclass qd-complex () ((real :initform +qd-zero+ @@ -43,7 +44,8 @@ (imag :initform +qd-zero+ :reader qd-imag :initarg :imag - :type %quad-double))) + :type %quad-double)) + (:documentation "Complex number consisting of QUAD-DOUBLE components"))

#-cmu (defmethod print-object ((qd qd-real) stream)