scm: Add access?
* module/mes/guile.mes (access?): New dummy function. Fixes Nyacc's #include.
This commit is contained in:
parent
091c1ccd31
commit
2c25f45678
|
@ -124,3 +124,6 @@
|
|||
((eq? c #\*eof*) s)
|
||||
(#t (read-string (read-char) (peek-char) (append-char s c)))))
|
||||
(list->string (read-string (read-char) (peek-char) (list))))
|
||||
|
||||
(define (access? file-name how) #t)
|
||||
(define R_OK 0)
|
||||
|
|
Loading…
Reference in a new issue