From: David Vázquez <davazp@gmail.com>
Date: Wed, 1 May 2013 21:27:32 +0000 (+0100)
Subject: Use defparameter instead of defvar to reset test reporting data
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=7e8425562de2bcfd1b4c4d335ceeeaa460a4ebc3;p=jscl.git

Use defparameter instead of defvar to reset test reporting data

It is useful to call run-tests-in-host multiple times
---

diff --git a/tests.lisp b/tests.lisp
index 8c57af4..65b4ae2 100644
--- a/tests.lisp
+++ b/tests.lisp
@@ -1,9 +1,8 @@
-(defvar *total-tests* 0)
-(defvar *passed-tests* 0)
-(defvar *failed-tests* 0)
-
-(defvar *expected-failures* 0)
-(defvar *unexpected-passes* 0)
+(defparameter *total-tests* 0)
+(defparameter *passed-tests* 0)
+(defparameter *failed-tests* 0)
+(defparameter *expected-failures* 0)
+(defparameter *unexpected-passes* 0)
 
 (defvar *use-html-output-p* t)
 (defun if-html (string) (if *use-html-output-p* string ""))