Parent Directory | Revision Log | Patch
revision 1.3 by pfdietz, Sun Apr 24 02:00:11 2005 UTC | revision 1.4 by pfdietz, Fri May 6 13:34:42 2005 UTC | |
---|---|---|
# | Line 147 | Line 147 |
147 | (deftest package-nicknames.error.2 | (deftest package-nicknames.error.2 |
148 | (signals-error (package-nicknames "CL" nil) program-error) | (signals-error (package-nicknames "CL" nil) program-error) |
149 | t) | t) |
150 | ||
151 | (deftest package-nicknames.error.3 | |
152 | (check-type-error #'package-nicknames #'package-designator-p) | |
153 | nil) | |
154 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |