anchor.diff:      :initarg  :width
       :initform nil
       :reader   pane-user-width
  -    :type     spacing-value)
  +    :type     (or null spacing-value))
      (user-min-width 
       :initarg :min-width
       :initform nil
       :reader   pane-user-min-width
  -    :type     spacing-value)
  +    :type     (or null spacing-value))
      (user-max-width
       :initarg :max-width
       :initform nil
       :reader   pane-user-max-width
  -    :type     spacing-value)
  +    :type     (or null spacing-value))
      (user-height
       :initarg :height
       :initform nil
       :reader   pane-user-height
  -    :type     spacing-value)
  +    :type     (or null spacing-value))
      (user-min-height
       :initarg :min-height
       :initform nil
       :reader   pane-user-min-height
  -    :type     spacing-value)
  +    :type     (or null spacing-value))
      (user-max-height
       :initarg :max-height
       :initform nil
       :reader   pane-user-max-height
  -    :type     spacing-value)
  +    :type     (or null spacing-value))
      (x-spacing
       :initarg :x-spacing
       :initform 0
       :reader   pane-x-spacing
  -    :type     spacing-value)
  +    :type     (or null spacing-value))
      (y-spacing
       :initarg :y-spacing
       :initform 0
       :reader   pane-y-spacing
  -    :type     spacing-value))
  +    :type     (or null spacing-value))
     (:documentation
      "Mixin class for panes which offer the standard user space requirements options."))
   
  
positive.code: ;;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  ;;; Boston, MA  02111-1307  USA.
  
  ;;; $Id: panes.lisp,v 1.113 2003-03-16 17:21:29 gilbert Exp $
  
  (in-package :CLIM-INTERNALS)
  
  
negative.code: 		     :initarg :display-function
  		     :accessor pane-display-function)
     ; Should inherit from label-pane for this one ??
     (label :type string
            :initform ""
  	  :initarg :label
  	  :reader pane-label)
     (text-margin :initarg :text-margin
  