diff options
| author | Drahflow <drahflow@gmx.de> | 2014-08-27 19:22:53 +0200 |
|---|---|---|
| committer | Drahflow <drahflow@gmx.de> | 2014-08-27 19:22:53 +0200 |
| commit | eec6b912bd39d2fa2ba6555521e913490875d6d9 (patch) | |
| tree | 4ec680a01377c4fb0077f7a22913a4022d7d1581 /compiler/standardClient.ey | |
| parent | 6bf9bb21e14d049220d534b33be0740bb9bd9a2b (diff) | |
Can now pass O_TRUNC
Diffstat (limited to 'compiler/standardClient.ey')
| -rw-r--r-- | compiler/standardClient.ey | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/standardClient.ey b/compiler/standardClient.ey index d55c23e..c842b84 100644 --- a/compiler/standardClient.ey +++ b/compiler/standardClient.ey @@ -390,6 +390,7 @@ bor bor ==:RWMASK 64 ==:OCREAT + 512 ==:OTRUNC 1024 ==:OAPPEND 1 ==:PROTREAD @@ -419,6 +420,8 @@ { flags RWMASK bnot band RDWR bor =flags } /readwrite deff { flags OCREAT bor =flags } /creating deff { flags OAPPEND bor =flags } /appending deff + { flags OTRUNC bor =flags } /truncating deff + { ==path fd 0 ge { "file already open" die } rep path "\0" cat flags mode 0 0 0 OPEN sys .asm .syscall -- _ =fd |