From 0df0f866402d12592c277c9ebbfd0cf374bc490a Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Mon, 18 Feb 2008 22:31:40 +0100
Subject: Remove some content-free lines of code from the test suite.

darcs-hash:0f0da7b5c8c62f3a2fb945c0f5ed886ecb93ffce
---
 Lisp/tests.lisp | 5 -----
 1 file changed, 5 deletions(-)

(limited to 'Lisp')

diff --git a/Lisp/tests.lisp b/Lisp/tests.lisp
index 5ac8ec7..443929e 100644
--- a/Lisp/tests.lisp
+++ b/Lisp/tests.lisp
@@ -376,11 +376,6 @@
     (is (eql instance
              (invoke instance 'self)))
 
-    #+(or) (setq instance (is (invoke class :string-with-u-t-f-8-string "Mulk.")))
-    #+(or) (is (objc-equal instance
-                           (invoke (find-objc-class 'ns-string)
-                                   :string-with-u-t-f-8-string "Mulk.")))
-
     ;; FIXME: What's wrong with the following line?  It makes CMUCL
     ;; throw weird errors.
     #+(or) (is (typep instance class-name))
-- 
cgit v1.2.3