From: Stelian Ionescu <sionescu@cddr.org>
Date: Mon, 21 Jan 2013 20:08:13 +0000 (+0100)
Subject: Remove redundant OPERATION-DONE-P on TEST-OP
X-Git-Tag: v0.8.0~14
X-Git-Url: https://repo.or.cz/w/iolib.git/commitdiff_plain/dc29c389cf9f78d5b69fa2a255c9a3a57ed453dc

Remove redundant OPERATION-DONE-P on TEST-OP
---

diff --git a/src/iolib.asd b/src/iolib.asd
index 6f60aea..8151049 100644
--- a/src/iolib.asd
+++ b/src/iolib.asd
@@ -15,6 +15,3 @@
 
 (defmethod perform ((o test-op) (c (eql (find-system :iolib))))
   (oos 'test-op :iolib-tests))
-
-(defmethod operation-done-p ((o test-op) (c (eql (find-system :iolib))))
-  nil)
diff --git a/tests/iolib-tests.asd b/tests/iolib-tests.asd
index 0cace4d..c954c4e 100644
--- a/tests/iolib-tests.asd
+++ b/tests/iolib-tests.asd
@@ -23,7 +23,3 @@
                     (c (eql (find-system :iolib-tests))))
   (operate 'load-op :iolib-tests)
   (funcall (intern (symbol-name '#:run!) '#:5am) :iolib))
-
-(defmethod operation-done-p ((o test-op)
-                             (c (eql (find-system :iolib-tests))))
-  nil)