From 67c152092835268be95e6e35f1f31b50d6546bbd Mon Sep 17 00:00:00 2001 From: nickysn Date: Wed, 23 Jun 2021 21:41:12 +0000 Subject: [PATCH] * changed the formatting of the setting of fs_rights_base in Do_Open. No functional changes. git-svn-id: trunk@49545 - --- rtl/wasi/sysfile.inc | 22 +++++++++++++++++++--- 1 file changed, 19 insertions(+), 3 deletions(-) diff --git a/rtl/wasi/sysfile.inc b/rtl/wasi/sysfile.inc index 9db2aaef6c..89c8b1c51f 100644 --- a/rtl/wasi/sysfile.inc +++ b/rtl/wasi/sysfile.inc @@ -222,15 +222,31 @@ Begin { We do the conversion of filemodes here, concentrated on 1 place } case (flags and 3) of 0 : begin - fs_rights_base :=__WASI_RIGHTS_FD_READ or __WASI_RIGHTS_FD_FILESTAT_GET or __WASI_RIGHTS_FD_SEEK or __WASI_RIGHTS_FD_TELL; + fs_rights_base :=__WASI_RIGHTS_FD_READ or + __WASI_RIGHTS_FD_FILESTAT_GET or + __WASI_RIGHTS_FD_SEEK or + __WASI_RIGHTS_FD_TELL; FileRec(f).mode:=fminput; end; 1 : begin - fs_rights_base :=__WASI_RIGHTS_FD_WRITE or __WASI_RIGHTS_FD_FILESTAT_GET or __WASI_RIGHTS_FD_SEEK or __WASI_RIGHTS_FD_TELL or __WASI_RIGHTS_FD_FILESTAT_SET_SIZE or __WASI_RIGHTS_FD_FILESTAT_SET_TIMES or __WASI_RIGHTS_FD_ALLOCATE; + fs_rights_base :=__WASI_RIGHTS_FD_WRITE or + __WASI_RIGHTS_FD_FILESTAT_GET or + __WASI_RIGHTS_FD_SEEK or + __WASI_RIGHTS_FD_TELL or + __WASI_RIGHTS_FD_FILESTAT_SET_SIZE or + __WASI_RIGHTS_FD_FILESTAT_SET_TIMES or + __WASI_RIGHTS_FD_ALLOCATE; FileRec(f).mode:=fmoutput; end; 2 : begin - fs_rights_base :=__WASI_RIGHTS_FD_READ or __WASI_RIGHTS_FD_WRITE or __WASI_RIGHTS_FD_FILESTAT_GET or __WASI_RIGHTS_FD_SEEK or __WASI_RIGHTS_FD_TELL or __WASI_RIGHTS_FD_FILESTAT_SET_SIZE or __WASI_RIGHTS_FD_FILESTAT_SET_TIMES or __WASI_RIGHTS_FD_ALLOCATE; + fs_rights_base :=__WASI_RIGHTS_FD_READ or + __WASI_RIGHTS_FD_WRITE or + __WASI_RIGHTS_FD_FILESTAT_GET or + __WASI_RIGHTS_FD_SEEK or + __WASI_RIGHTS_FD_TELL or + __WASI_RIGHTS_FD_FILESTAT_SET_SIZE or + __WASI_RIGHTS_FD_FILESTAT_SET_TIMES or + __WASI_RIGHTS_FD_ALLOCATE; FileRec(f).mode:=fminout; end; end;