Use C++ style overload resolution.
src/mandelbrot/mandelbrotwidget.lisp
Fri Apr 17 17:30:05 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Use C++ style overload resolution.
--- old-kde.examples/src/mandelbrot/mandelbrotwidget.lisp 2014-10-30 07:19:40.000000000 +0100
+++ new-kde.examples/src/mandelbrot/mandelbrotwidget.lisp 2014-10-30 07:19:41.000000000 +0100
@@ -53,8 +53,7 @@
qt:+queued-connection+))
(defun draw-rendering (painter widget)
- (cxx:set-pen painter (make-instance 'qt:color
- :args (list qt:+white+)))
+ (cxx:set-pen painter #xFFFFFF) ;; FIXME make qt:+white+ work
(cxx:draw-text painter (cxx:rect widget)
(value qt:+align-center+)
"Rendering initial image, please wait..."))
@@ -93,8 +92,7 @@
(declare (ignore event))
(qt:with-painter (painter widget)
(cxx:fill-rect painter (cxx:rect widget)
- (make-instance 'qt:brush :args (list
- (make-instance 'qt:color :args (list qt:+black+)))))
+ #x000) ;; FIXME qt:+black+
(if (null (pixmap widget))
(draw-rendering painter widget)
(draw-pixmap painter widget))))