/[emacs]/emacs/lisp/emacs-lisp/ewoc.el
ViewVC logotype

Diff of /emacs/lisp/emacs-lisp/ewoc.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.9 by pj, Thu Dec 20 18:52:58 2001 UTC revision 1.9.4.1 by miles, Fri Apr 4 06:20:16 2003 UTC
# Line 92  Line 92 
92    
93  ;; In the mean time `grep '^(.*ewoc-[^-]' emacs-lisp/ewoc.el' can help  ;; In the mean time `grep '^(.*ewoc-[^-]' emacs-lisp/ewoc.el' can help
94  ;; you find all the exported functions:  ;; you find all the exported functions:
95  ;;  ;;
96  ;; (defun ewoc-create (pretty-printer &optional header footer)  ;; (defun ewoc-create (pretty-printer &optional header footer)
97  ;; (defalias 'ewoc-data 'ewoc--node-data)  ;; (defalias 'ewoc-data 'ewoc--node-data)
98  ;; (defun ewoc-location (node)  ;; (defun ewoc-location (node)
# Line 138  Line 138 
138              (:constructor ewoc--node-create (start-marker data)))              (:constructor ewoc--node-create (start-marker data)))
139    left right data start-marker)    left right data start-marker)
140    
141  (defalias 'ewoc--node-branch 'aref)  (defalias 'ewoc--node-branch 'aref
142      "Get the left (CHILD=0) or right (CHILD=1) child of the NODE.
143    
144    \(fn NODE CHILD)")
145    
146  (defun ewoc--dll-create ()  (defun ewoc--dll-create ()
147    "Create an empty doubly linked list."    "Create an empty doubly linked list."
# Line 391  MAP-FUNCTION is applied to the first ele Line 394  MAP-FUNCTION is applied to the first ele
394  If MAP-FUNCTION returns non-nil the element will be refreshed (its  If MAP-FUNCTION returns non-nil the element will be refreshed (its
395  pretty-printer will be called once again).  pretty-printer will be called once again).
396    
397  Note that the buffer for EWOC will be current buffer when MAP-FUNCTION  Note that the buffer for EWOC will be current buffer when MAP-FUNCTION
398  is called.  MAP-FUNCTION must restore the current buffer to BUFFER before  is called.  MAP-FUNCTION must restore the current buffer to BUFFER before
399  it returns, if it changes it.  it returns, if it changes it.
400    
401  If more than two arguments are given, the remaining  If more than two arguments are given, the remaining
# Line 407  arguments will be passed to MAP-FUNCTION Line 410  arguments will be passed to MAP-FUNCTION
410    
411  (defun ewoc-filter (ewoc predicate &rest args)  (defun ewoc-filter (ewoc predicate &rest args)
412    "Remove all elements in EWOC for which PREDICATE returns nil.    "Remove all elements in EWOC for which PREDICATE returns nil.
413  Note that the buffer for EWOC will be current-buffer when PREDICATE  Note that the buffer for EWOC will be current-buffer when PREDICATE
414  is called. PREDICATE must restore the current buffer before it returns  is called. PREDICATE must restore the current buffer before it returns
415  if it changes it.  if it changes it.
416  The PREDICATE is called with the element as its first argument. If any  The PREDICATE is called with the element as its first argument. If any
# Line 475  If the EWOC is empty, nil is returned." Line 478  If the EWOC is empty, nil is returned."
478          ;; best-guess is now a "best guess".          ;; best-guess is now a "best guess".
479          ;; Find the correct node. First determine in which direction          ;; Find the correct node. First determine in which direction
480          ;; it lies, and then move in that direction until it is found.          ;; it lies, and then move in that direction until it is found.
481        
482          (cond          (cond
483           ;; Is pos after the guess?           ;; Is pos after the guess?
484           ((>= pos           ((>= pos

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.9.4.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26