Repositories / ecl.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 23635eb)
Regression test for sf286: Don't depend on swank being loaded.
authorPhilipp Marek <philipp@marek.priv.at>
Wed, 5 Mar 2014 06:33:50 +0000 (07:33 +0100)
committerPhilipp Marek <philipp@marek.priv.at>
Sat, 8 Mar 2014 20:21:28 +0000 (21:21 +0100)
src/tests/bugs/sf286.lsp patch | blob | blame | history

diff --git a/src/tests/bugs/sf286.lsp b/src/tests/bugs/sf286.lsp
index f80c68c..36efece 100644 (file)
--- a/src/tests/bugs/sf286.lsp
+++ b/src/tests/bugs/sf286.lsp
@@ -1,17 +1,15 @@
-
 ;; miscompilation - assumed that read-from-string returns a fixnum.
 
 (deftest sf286-a
          (assert
            (let ((string ":cl-user"))
              (find-package 
-               (let ((*package* *swank-io-package*))
+               (let ((*package* (find-package :cl)))
                  (read-from-string string))))))
 
 (deftest sf286-b
          (assert
            (let ((string ":cl-user"))
-             (let ((*package* *swank-io-package*))
+             (let ((*package* (find-package :cl)))
                (find-package 
-                 (read-from-string string)))))
-
+                 (read-from-string string))))))
Embeddable Common Lisp (Official: https://gitlab.com/embeddable-common-lisp/ecl)