diff options
| -rw-r--r-- | lisp/emacs-lisp/avl-tree.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/avl-tree.el b/lisp/emacs-lisp/avl-tree.el index 75ec86c0d0e..604147f618e 100644 --- a/lisp/emacs-lisp/avl-tree.el +++ b/lisp/emacs-lisp/avl-tree.el | |||
| @@ -101,7 +101,6 @@ | |||
| 101 | (defun elib-stack-create () (list)) | 101 | (defun elib-stack-create () (list)) |
| 102 | (defmacro elib-stack-push (stack object) `(push ,object ,stack)) | 102 | (defmacro elib-stack-push (stack object) `(push ,object ,stack)) |
| 103 | (defmacro elib-stack-pop (stack) `(pop ,stack)) | 103 | (defmacro elib-stack-pop (stack) `(pop ,stack)) |
| 104 | (provide 'avl-tree) | ||
| 105 | 104 | ||
| 106 | ;;; ================================================================ | 105 | ;;; ================================================================ |
| 107 | ;;; Functions and macros handling an AVL tree node. | 106 | ;;; Functions and macros handling an AVL tree node. |
| @@ -567,4 +566,6 @@ If there is no such element in the tree, the value is nil." | |||
| 567 | "Clear the avl tree TREE." | 566 | "Clear the avl tree TREE." |
| 568 | (elib-node-set-left (elib-avl-dummyroot tree) nil)) | 567 | (elib-node-set-left (elib-avl-dummyroot tree) nil)) |
| 569 | 568 | ||
| 569 | (provide 'avl-tree) | ||
| 570 | |||
| 570 | ;;; avltree.el ends here | 571 | ;;; avltree.el ends here |