Parent Directory | Revision Log | Patch
revision 1.3 by pfdietz, Sat Jan 17 21:27:09 2004 UTC | revision 1.4 by pfdietz, Sat Aug 14 18:56:53 2004 UTC | |
---|---|---|
# | Line 38 | Line 38 |
38 | t) | t) |
39 | ||
40 | (deftest probe-file.error.3 | (deftest probe-file.error.3 |
41 | (signals-error (probe-file (make-pathname :name :wild)) file-error) | (signals-error-always (probe-file (make-pathname :name :wild)) file-error) |
42 | t) | t t) |
43 | ||
44 | (deftest probe-file.error.4 | (deftest probe-file.error.4 |
45 | (signals-error (probe-file "CLTEST:*.FOO") file-error) | (signals-error-always (probe-file "CLTEST:*.FOO") file-error) |
46 | t) | t t) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |