unlock `file-error?` test case
This commit is contained in:
parent
cc502cadef
commit
ff843f0e8f
|
@ -2292,9 +2292,9 @@
|
|||
(test #t (file-exists? "."))
|
||||
(test #f (file-exists? " no such file "))
|
||||
|
||||
;; (test #t (file-error?
|
||||
;; (guard (exn (else exn))
|
||||
;; (delete-file " no such file "))))
|
||||
(test #t (file-error?
|
||||
(guard (exn (else exn))
|
||||
(delete-file " no such file "))))
|
||||
|
||||
(test-end)
|
||||
|
||||
|
|
Loading…
Reference in New Issue