artemist/mes
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

scm: Add access?

Browse source 
* 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
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
module/mes/guile.mes
View file

@ -124,3 +124,6 @@
((eq? c #\*eof*) s) ((eq? c #\*eof*) s)
(#t (read-string (read-char) (peek-char) (append-char s c))))) (#t (read-string (read-char) (peek-char) (append-char s c)))))
(list->string (read-string (read-char) (peek-char) (list)))) (list->string (read-string (read-char) (peek-char) (list))))
(define (access? file-name how) #t)
(define R_OK 0)