Tue Apr 7 11:51:12 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* use trivial-garbage instead of sb-ext
diff -rN -u old-qt.tests/src/signal-slot.lisp new-qt.tests/src/signal-slot.lisp
--- old-qt.tests/src/signal-slot.lisp 2014-10-30 07:03:36.000000000 +0100
+++ new-qt.tests/src/signal-slot.lisp 2014-10-30 07:03:36.000000000 +0100
@@ -109,13 +109,13 @@
(let ((object (make-instance 'qt:object)))
(qt:connect (qt:get-signal object "destroyed()")
#'(lambda () (setf *destroyed* t)))
- (sb-ext:gc :full t)
+ (tg:gc :full t)
(5am:is (eql nil *destroyed*)))
- (sb-ext:gc :full t))
+ (tg:gc :full t))
(5am:test (destroyed-signal :depends-on gc-qobject)
"Receive a destroy signal for a QObject."
(setf *destroyed* nil)
(test-destroyed-signal)
- (sb-ext:gc :full t)
+ (tg:gc :full t)
(5am:is (eql t *destroyed*)))