HCoop
/
bpt
/
guile.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
5dc1ba7
)
Add another comment to:
author
Kevin Ryde
<user42@zip.com.au>
Mon, 15 Sep 2003 22:29:32 +0000
(22:29 +0000)
committer
Kevin Ryde
<user42@zip.com.au>
Mon, 15 Sep 2003 22:29:32 +0000
(22:29 +0000)
(file-exists?): Use stat rather than access?, ...
ice-9/boot-9.scm
patch
|
blob
|
blame
|
history
diff --git
a/ice-9/boot-9.scm
b/ice-9/boot-9.scm
index
5ec9b32
..
b06c344
100644
(file)
--- a/
ice-9/boot-9.scm
+++ b/
ice-9/boot-9.scm
@@
-407,6
+407,7
@@
(if (provided? 'socket)
(primitive-load-path "ice-9/networking.scm"))
+;; For reference, Emacs file-exists-p uses stat in this same way.
;; ENHANCE-ME: Catching an exception from stat is a bit wasteful, do this in
;; C where all that's needed is to inspect the return from stat().
(define file-exists?