X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fpackage.lisp;h=034ec4aadad7b03330d338079456cbb7e0f59086;hb=29c5587e4ad81dd1442c5f54cc686a45f7cb9d2e;hp=814057be1849c253fafbfb3102f7fdf027b5726c;hpb=43fdd8d126248aa25a56771febf11b4f5efe397c;p=jscl.git diff --git a/tests/package.lisp b/tests/package.lisp index 814057b..034ec4a 100644 --- a/tests/package.lisp +++ b/tests/package.lisp @@ -23,3 +23,8 @@ (member baz symbols))))) (test (member 'car (find-all-symbols (string 'car)))) + +;; This test is failing. I have disabled temporarily. +;; (test (eq (eval '(in-package #:cl-user)) (find-package '#:cl-user))) + +