From: Marco Baringer <mb@bese.it>
Date: Thu, 29 Nov 2012 10:55:16 +0000 (+0100)
Subject: Explicityl make the *suites* hash table an eql table
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=2733dc1598c592d6b1c411b81b67033279725e56;p=fiveam.git

Explicityl make the *suites* hash table an eql table
---

diff --git a/src/suite.lisp b/src/suite.lisp
index 9ac85f0..9aab2cc 100644
--- a/src/suite.lisp
+++ b/src/suite.lisp
@@ -16,7 +16,7 @@
 
 ;;;; ** Creating Suits
 
-(defvar *suites* (make-hash-table))
+(defvar *suites* (make-hash-table :test 'eql))
 
 (defmacro def-suite (name &key description (in nil in-p) (fixture nil fixture-p))
   "Define a new test-suite named NAME.