X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fclasses.lisp;h=0e7d836356808b39bd575aa5457f9ca23c626ee5;hb=8e2b8ea5671d45cd1b3efdd037af289200e6e0a8;hp=7d929de57270c038205a371b7642c5942588a740;hpb=325262d82eb9620b042e4c2bad38eb5dd47c03ef;p=fiveam.git

diff --git a/src/classes.lisp b/src/classes.lisp
index 7d929de..0e7d836 100644
--- 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)