anchor.diff:  ;;;   * Portable MOP provided by CLIM-MOP package
   
   ;;; TODO:
  -;;;   * EQL specializers (not portable according to AMOP)
  +;;;   * EQL specializers on implementations other than SBCL/CMUCL
   ;;;   * Nicer, more clever display of methods than simply listing them in a row.
   ;;;     To do this right really involes some nonportable fun and a codewalker.
   ;;;     You could probably write something that just understood the standard
  
positive.code: ;;; --------------------------------------------------------------------
  
  ;;; This is an example of how to write a CLIM application with a
  ;;; "normal" GUI. McCLIM can do more than just command lines..
  
  ;;; Running the method-browser:
  ;;;   (clim-demo::run-test 'clim-demo::method-browser)
  
negative.code:   "Generates the display of applicable methods in the output-pane"
    (when (gf frame)
      (let* ((gf (gf frame))
             (methods (compute-applicable-methods-from-specializers gf (arg-types frame)))
             (combination (clim-mop:generic-function-method-combination gf))
             (effective-methods (clim-mop:compute-effective-method gf combination methods))
             (serial-methods (walk-em-form effective-methods)))      
        ;; Print the header
        (fresh-line)
        (with-drawing-options (pane :text-style (make-text-style :sans-serif :bold :large)
  