Use overload resolution instead of static-call
src/signal-slot/connect.lisp
Sun May 24 16:40:11 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Use overload resolution instead of static-call
--- old-qt.gui/src/signal-slot/connect.lisp 2014-10-30 07:49:49.000000000 +0100
+++ new-qt.gui/src/signal-slot/connect.lisp 2014-10-30 07:49:49.000000000 +0100
@@ -150,19 +150,12 @@
(defun connect-id (sender signal-id receiver slot-id type types)
- (static-call "QMetaObject" "connect#$#$$$"
- sender
- signal-id
- receiver
- slot-id
- (if (null type)
- (value +auto-connection+)
- (value type))
- types))
+ (meta-object.connect sender signal-id
+ receiver slot-id
+ (if (null type)
+ (value +auto-connection+)
+ (value type))
+ types))
(defun disconnect-id (sender signal-id receiver slot-id)
- (static-call "QMetaObject" "disconnect#$#$"
- sender
- signal-id
- receiver
- slot-id))
+ (meta-object.disconnect sender signal-id receiver slot-id))