From 1bc33781d8a4b32cff12f2bb8653bd8a72af7842 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= Date: Thu, 13 Aug 2015 14:13:44 +0200 Subject: [PATCH] tests: mop-dependents: remove typo (?) MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Daniel Kochmański --- src/tests/bugs/doit.lsp | 6 +++--- src/tests/bugs/mop-dependents.lsp | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/src/tests/bugs/doit.lsp b/src/tests/bugs/doit.lsp index b4780d199..1f8b527b4 100644 --- a/src/tests/bugs/doit.lsp +++ b/src/tests/bugs/doit.lsp @@ -71,8 +71,8 @@ (load "eformat-002.lsp")) (load "eformat-001.lsp")) -(setf sb-rt::*expected-failures* - (nconc sb-rt::*expected-failures* - '(MOP-GF-ADD/REMOVE-DEPENDENT))) +;; (setf sb-rt::*expected-failures* +;; (nconc sb-rt::*expected-failures* +;; '(MOP-GF-ADD/REMOVE-DEPENDENT))) (time (sb-rt:do-tests)) diff --git a/src/tests/bugs/mop-dependents.lsp b/src/tests/bugs/mop-dependents.lsp index 288159f9c..a2316350b 100644 --- a/src/tests/bugs/mop-dependents.lsp +++ b/src/tests/bugs/mop-dependents.lsp @@ -82,7 +82,7 @@ (equalp l3 (list (list f 'remove-method m1) (list f 'add-method m1) - (list f :name 'mop-gf-add/remove-dependent))) + (list f))) (null l4) (eq l5 l3) (eq l6 l3)