;; -*- Scheme -*-
;;
;; $Id: avl-treet02.scm,v 1.1 1998/03/16 07:57:23 foner Exp $

;;-----------

(require 'avl-tree:test:from-list)

;;-----------


;;+doc
;; procedure: avl-tree:test
;; arguments: none
;; signature: () -> unspecified
;; 
;; Applies all the regression tests for various AVL tree processing functions
;; If a test fails, a message should be printed indicating which test.
;; There will be no output if all the tests pass.
;;-doc

(define avl-tree:test
  (lambda args
    (apply avl-tree:test:from-list args)
    ))

;; eof
