Miroirs/planckforth
1
0
Fork 0
mirror of https://github.com/nineties/planckforth synced 2024-12-25 21:58:22 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

create file with mode 0644

Browse source
This commit is contained in:
Koichi Nakamura 2021-12-19 22:59:51 +09:00
parent 79ff253b9c
commit 9caf854e0c
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
bootstrap.fs
View file

@ -2464,7 +2464,7 @@ BLOCK-SIZE remaining-size !
6 constant SYS-CLOSE 6 constant SYS-CLOSE
: (open) ( c-addr fam -- fd ) : (open) ( c-addr fam -- fd )
swap SYS-OPEN syscall2 %110100100 .s -rot swap SYS-OPEN syscall3
; ;
: (close) ( obj -- n ) : (close) ( obj -- n )