anchor.diff:        (space-requirement-components sr)
       (with-slots (user-width user-min-width user-max-width
                    user-height user-min-height user-max-height) pane
  -
         (dada ((foo width height))
               ;; the user wins on the "primary" dimensions
               ;; ^- this can't be true...
  
positive.code: ;;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  ;;; Boston, MA  02111-1307  USA.
  
  ;;; $Id: panes.lisp,v 1.104 2002-11-10 14:42:36 gilbert Exp $
  
  (in-package :CLIM-INTERNALS)
  
  
negative.code:                                                           (slot-value pane 'y-spacing))
                                                       0))
          (slot-value pane 'user-width)      width
          (slot-value pane 'user-min-width)  min-width
          (slot-value pane 'user-max-width)  max-width
          (slot-value pane 'user-height)     height
          (slot-value pane 'user-min-height) min-height
          (slot-value pane 'user-max-height) max-height))
  
  (defmethod initialize-instance :after ((pane space-requirement-options-mixin)
                                         &rest space-req-keys)
  