Added ability to specify fixtures on the suite object itself (instead of having to...

[fiveam.git] / src / classes.lisp

diff --git a/src/classes.lisp b/src/classes.lisp
index 5459580..fa099ce 100644 (file)
--- a/src/classes.lisp
+++ b/src/classes.lisp
@@ -1,6 +1,6 @@
-;; -*- lisp -*-
+;;;; -*- Mode: Lisp; indent-tabs-mode: nil -*-
 
-(in-package :it.bese.FiveAM)
+(in-package :it.bese.fiveam)
 
 (defclass testable-object ()
   ((name :initarg :name :accessor name
@@ -36,7 +36,10 @@
   ((tests :accessor tests :initform (make-hash-table :test 'eql)
           :documentation "The hash table mapping names to test
          objects in this suite. The values in this hash table
-         can be either test-cases or other test-suites."))
+         can be either test-cases or other test-suites.")
+   (fixture :accessor fixture :initform nil :initarg :fixture
+            :documentation "FIXTURE to use, by default, for tests in
+            this suite."))
   (:documentation "A test suite is a collection of tests or test suites.
 
 Test suites serve to organize tests into groups so that the