scm: Add access?

* module/mes/guile.mes (access?): New dummy function.  Fixes Nyacc's #include.
This commit is contained in:
Jan Nieuwenhuizen 2017-03-31 21:41:32 +02:00
parent 091c1ccd31
commit 2c25f45678

View file

@ -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)