anchor.diff:  
   #+cmu
   (progn
  -  (unless (fboundp 'stream-read-char)
  +  (unless (fboundp 'ext:stream-read-char)
       (unless (ignore-errors (ext:search-list "gray-streams:"))
         (setf (ext:search-list "gray-streams:")
   	'("target:pcl/" "library:subsystems/")))
       (load "gray-streams:gray-streams-library"))
  -  #+nil
  -  (load (merge-pathnames "patch-cmu.lisp" *clim-directory*))
  -
     #-MK-DEFSYSTEM
     (load "library:subsystems/defsystem"))
   
  
positive.code:    )
  
  (clim-defsystem (:clim-clx :depends-on (:clim-frontend))
    "Backends/CLX/keysyms"
    "Backends/CLX/keysymdef"
    "Backends/CLX/port"
    "Backends/CLX/medium"
    "Backends/CLX/graft"
    "Backends/CLX/frame-manager"
    "Backends/CLX/image"
    "Backends/CLX/clim-extensions")
  
  (clim-defsystem (:clim-looks :depends-on (:clim-frontend))
    "looks/pixie")
  
negative.code:    "coordinates"
     "transforms"
     "regions"
  
     "sheets"
     "pixmap"
     
     "events"
  
     "ports" ; depends on events
     "grafts"
     "medium"
     "output"
  
     "input"
     "repaint"
     "graphics"
  