(#P"/root/quicklisp/local-projects/clim2/clim/db-stream.lisp" 
 ((378 "(defclass accept-values-pane (clim-stream-pane) " 10 23)))

(#P"/root/quicklisp/local-projects/clim2/clim/panes.lisp"
 ((83 "(define-pane-type :accept-values (&rest options &key (scroll-bars :vertical))" 19 32) 
  (86 "     :type 'accept-values-pane" 12 25)))

#P"/root/quicklisp/local-projects/clim2/clim/command-processor.lisp"
   (355 "(defun accept-values-command-parser (command-name command-table stream partial-command" 7 20)

(#P"/root/quicklisp/local-projects/clim2/clim/accept-values.lisp" ;; all sorts of stuff
 )

(#P"/root/quicklisp/local-projects/clim2/aclpc/acl-mirror.lisp"
   ((67 "(defmethod modal-frame-p ((frame clim-internals::accept-values-own-window)) t)" 49 62)))

(#P"/root/quicklisp/local-projects/clim2/aclpc/acl-frames.lisp"
   ((704 "(defmethod accept-values-pane-p ((object t)) nil)" 11 24)
    (705 "(defmethod accept-values-pane-p ((object accept-values-pane)) t)" 11 24)
    (714 "			   (when (accept-values-pane-p sheet)" 13 26)
    (728 "                           (when (accept-values-pane-p sheet)" 34 47)
    (1590 "(defmethod accept-values-frame-p ((object t)) nil)" 11 24)
    (1591 "(defmethod accept-values-frame-p ((object clim-internals::accept-values-own-window)) t)" 11 24) (1596 "	  ((accept-values-frame-p frame)" 5 18)
    (1982 "		 clim-internals::accept-values-own-window)))" 19 32)
    (1995 "  ;; This definition overrides the more general method in clim/accept-values.lisp" 63 76)))

(#P"/root/quicklisp/local-projects/clim2/clim/text-recording.lisp"
   ((323 "(defmethod recompute-contents-ok ((text standard-text-output-record))" 11 32)
    (356 "(defmethod recompute-contents-ok ((text styled-text-output-record))" 11 32)))

(#P"/root/quicklisp/local-projects/clim2/clim/incremental-redisplay.lisp"
   ((247 "(defmethod recompute-contents-ok ((record output-record-element-mixin))" 11 32)
    (250 "(defmethod recompute-contents-ok :around ((record output-record-element-mixin))" 11 32)
    (254 "(defmethod recompute-contents-ok ((record output-record-mixin))" 11 32) (281 "                   (return-from recompute-contents-ok nil))))" 32 53)))

(#P"/root/quicklisp/local-projects/clim2/clim/accept-values.lisp" ((748 "(defmethod accept-values-resynchronize ((stream accept-values-stream))" 11 38)))

(#P"/root/quicklisp/local-projects/clim2/clim/presentations.lisp"
   ((452 "(defun set-highlighted-presentation (stream presentation &optional (prefer-pointer-window t))" 7 35)))
  (#P"/root/quicklisp/local-projects/clim2/clim/presentations.lisp"
   ((471 "(defun unhighlight-highlighted-presentation (stream &optional (prefer-pointer-window t))" 7 43)))

#P"/root/quicklisp/local-projects/clim2/compatibility/clim1-compatibility.lisp"
   (1337 "(defun find-presentation-translators (from-type to-type command-table)" 7 35)

(#P"/root/quicklisp/local-projects/clim2/clim/translators.lisp"
   ((348 "(defun find-presentation-translators (from-type to-type command-table)" 7 35)
    (383 "(defun find-presentation-translators-1 (from-key to-key command-table)" 7 35)))

#P"/root/quicklisp/local-projects/clim2/clim/command.lisp"
(921 "(defun find-presentation-translator (translator-name command-table &key (errorp t))" 7 35)

(#P"/root/quicklisp/local-projects/clim2/silica/sheet.lisp" ((270 "(defclass sheet-translation-mixin (sheet-transformation-mixin) ())" 10 33)))

#P"/root/quicklisp/local-projects/clim2/clim/command-processor.lisp"
(587 "(defun command-table-complete-input (command-table string action &key frame)" 7 35)

#P"/root/quicklisp/local-projects/clim2/clim/command-processor.lisp" (436 "(defun menu-command-parser (command-table stream &key timeout)" 7 26)3

(#P"/root/quicklisp/local-projects/clim2/clim/command-processor.lisp" ((504 "(defun menu-read-remaining-arguments-for-partial-command" 7 56)))

(#P"/root/quicklisp/local-projects/clim2/clim/table-formatting.lisp"
   ((580 "#+Genera (zwei:defindentation (map-over-item-list-cells 1 1))" 31 55)
    (615 "      (map-over-item-list-cells menu #'count-cells))" 7 31)
    (658 "                                      (map-over-item-list-cells menu #'sum-width))" 39 63)
    (712 "              (map-over-item-list-cells menu #'size-cells))" 15 39)
    (793 "                  (map-over-item-list-cells menu #'adjust-cells)))))))))" 19 43)))

(#P"/root/quicklisp/local-projects/clim2/clx/clx-pixmaps.lisp" ((34 "(defmethod pixmap-depth ((pixmap clx-pixmap))" 11 23)))
(#P"/root/quicklisp/local-projects/clim2/utils/designs.lisp" ((630 "(defun make-contrasting-dash-patterns (n &optional k)" 7 37)))
#P"/root/quicklisp/local-projects/clim2/clim/incremental-redisplay.lisp" (547 "(defmethod augment-draw-set ((record output-record-element-mixin)")
                                                                         
#P"/root/quicklisp/local-projects/clim2/test/test-driver.lisp" (812 "(defun invoke-accept-values-button (label pane)" 14 27)
                                                               
                                                               #P"/root/quicklisp/local-projects/clim2/clim/gadget-output.lisp"
   (749 "(defmethod accept-values-note-text-field-changed-callback" 11 24)
   (758 "(defmethod accept-values-string-field-changed-callback" 11 24)
   
   #P"/root/quicklisp/local-projects/clim2/clim/incremental-redisplay.lisp" (896 "(defmethod cache-output-record ((output-record standard-updating-output-record)" 11 30)
                                                                            
(#P"/root/quicklisp/local-projects/clim2/clim/incremental-redisplay.lisp"
   ((143 "(defun find-cached-output-record-1 (record record-type &rest initargs)" 7 32) (145 "   (apply #'find-cached-output-record" 12 37)
    (908 "(defmethod find-cached-output-record ((record standard-updating-output-record)" 11 36)))                                                                            

(#P"/root/quicklisp/local-projects/clim2/clim/command.lisp" 
   ((864 "(defun add-presentation-translator-to-command-table (command-table translator" 7 51)))

#P"/root/quicklisp/local-projects/clim2/clim/command.lisp"
   (888 "(defun remove-presentation-translator-from-command-table (command-table translator-name" 7 56)
   
   (#P"/root/quicklisp/local-projects/clim2/clim/ptypes1.lisp"
   ((1696 "(define-presentation-generic-function presentation-default-preprocessor-method" 38 71)
    (1697 "                                      presentation-default-preprocessor" 38 71)))

(#P"/root/quicklisp/local-projects/clim2/clim/ptypes2.lisp"
   ((253 "(defun presentation-default-preprocessor (default presentation-type &key default-type)" 7 40)
    (255 "    (funcall-presentation-generic-function presentation-default-preprocessor" 43 76)
    (258 "(define-default-presentation-method presentation-default-preprocessor" 36 69)))

  (#P"/root/quicklisp/local-projects/clim2/clim/standard-types.lisp"
   ((403 "(define-presentation-method presentation-default-preprocessor" 28 61) (1011 "(define-presentation-method presentation-default-preprocessor" 28 61)))
  
  (#P"/root/quicklisp/local-projects/clim2/clim/interactive-defs.lisp" ((302 "(defmacro with-accept-help (options &body body)" 10 26)))
  
  (#P"/root/quicklisp/local-projects/clim2/silica/classes.lisp" ((194 "(define-event-class pointer-double-click-event (pointer-click-event) ())" 20 46)))
  
(#P"/root/quicklisp/local-projects/clim2/clim/input-protocol.lisp"
   ((175 "(defmethod queue-event ((stream input-protocol-mixin) (event pointer-click-event))" 61 80)))  

(#P"/root/quicklisp/local-projects/clim2/silica/classes.lisp"
   ((192 "(define-event-class pointer-click-event (pointer-button-event) ())" 20 39)
    (193 "(define-event-class pointer-click-hold-event (pointer-click-event) ())" 46 65)
    (194 "(define-event-class pointer-double-click-event (pointer-click-event) ())" 48 67)))

#P"/root/quicklisp/local-projects/clim2/compatibility/clim1-compatibility.lisp"
   (1337 "(defun find-presentation-translators (from-type to-type command-table)" 7 35)
   
#P"/root/quicklisp/local-projects/clim2/clim/command.lisp" (921 "(defun find-presentation-translator (translator-name command-table &key (errorp t))" 7 35)   
                                                                                                                      
(#P"/root/quicklisp/local-projects/clim2/clim/translators.lisp"
   ((348 "(defun find-presentation-translators (from-type to-type command-table)" 7 35)
    (383 "(defun find-presentation-translators-1 (from-key to-key command-table)" 7 35)
))