Add support for collecting profiling information during test runs.

[fiveam.git] / src / classes.lisp

diff --git a/src/classes.lisp b/src/classes.lisp
index 7d929de..0e7d836 100644 (file)
--- a/src/classes.lisp
+++ b/src/classes.lisp
@@ -15,7 +15,18 @@
           dependencies, have passed. NIL - this test
           failed (either it failed or its dependecies weren't
           met. :circular this test has a circular depenedency
-          and was skipped.")))
+          and was skipped.")
+   (profiling-info :accessor profiling-info
+                   :initform nil
+                   :documentation "An object representing how
+                   much time and memory where used by the
+                   test.")
+   (collect-profiling-info :accessor collect-profiling-info
+                           :initarg :collect-profiling-info
+                           :initform nil
+                           :documentation "When T profiling
+                           information will be collected when the
+                           test is run.")))
 
 (defmethod print-object ((test testable-object) stream)
   (print-unreadable-object (test stream :type t :identity t)