#lang r7rs

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                              All Tests                                    ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Runs all ADT tests. Open this file and evaluate to run everything.

(import (scheme base)
        (pp1 tests)
        (prefix (pacman-project tests test-position) position:)
        (prefix (pacman-project tests test-maze) maze:)
        (prefix (pacman-project tests test-pacman) pacman:)
        (prefix (pacman-project tests test-score) score:)
        (prefix (pacman-project tests test-timer) timer:))

(define (test-all)
  (position:test)
  (maze:test)
  (pacman:test)
  (score:test)
  (timer:test))

(test-all)