Tue Apr 7 11:51:12 CEST 2009 Tobias Rautenkranz * 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:59:15.000000000 +0100 +++ new-qt.tests/src/signal-slot.lisp 2014-10-30 07:59:15.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*)))