Mon Jan 25 19:47:00 CET 2010  Tobias Rautenkranz <tobias@rautenkranz.ch>
  * Check enum type on overload resolution
diff -rN -u old-smoke/src/overload-resolution.lisp new-smoke/src/overload-resolution.lisp
--- old-smoke/src/overload-resolution.lisp	2014-10-30 08:08:11.000000000 +0100
+++ new-smoke/src/overload-resolution.lisp	2014-10-30 08:08:11.000000000 +0100
@@ -337,7 +337,8 @@
     (9 (object.typep '(c-integer :unsigned-long)))
     (10 (object.typep 'single-float))
     (11 (object.typep 'double-float))
-    (12 (object.typep 'enum)) ;; FIXME enum-type
+    (12 (and (object.typep 'enum) ;; FIXME enum-type using type
+             (smoke-type= type (enum-type object))))
     (13 (and (object.typep 'smoke-standard-object)
              (smoke-type= (get-class type) (object.type-of))))))