Fix enum to int promotion.
Mon May 11 15:35:40 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Fix enum to int promotion.
diff -rN -u old-smoke/src/overload-resolution.lisp new-smoke/src/overload-resolution.lisp
--- old-smoke/src/overload-resolution.lisp 2014-10-01 12:22:33.000000000 +0200
+++ new-smoke/src/overload-resolution.lisp 2014-10-01 12:22:34.000000000 +0200
@@ -356,7 +356,9 @@
(object.typep 'string))
(make-match 'promotion 'coerce-c-string)))
(6 (when (object.typep 'enum)
- (make-match 'promotion 'cocere-enum)))))
+ (make-match 'promotion 'coerce-enum)))
+ (7 (when (object.typep 'enum)
+ (make-match 'promotion 'coerce-enum)))))
(defun coerce-cast (object to-class)
(cast object to-class))