mes: Define R_OK as 4.

Reported by fossy via IRC.

* mes/module/mes/posix.mes (R_OK): Define as 4.
This commit is contained in:
Janneke Nieuwenhuizen 2023-07-01 08:29:17 +02:00
parent 8aa28acb4f
commit 00720c8d5f

View file

@ -1,7 +1,7 @@
;;; -*-scheme-*-
;;; GNU Mes --- Maxwell Equations of Software
;;; Copyright © 2017 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2017, 2023 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
;;;
;;; This file is part of GNU Mes.
;;;
@ -24,7 +24,7 @@
(mes-use-module (srfi srfi-13))
(define R_OK 0)
(define R_OK 4)
(define S_IRWXU #o700)
(define (basename file-name . ext)