io.unix.mmap: use open-file instead of open
parent
1342d0964c
commit
d3f924681b
extra/io/unix/mmap
|
@ -4,7 +4,7 @@ USING: alien io io.files kernel math system unix io.unix.backend
|
|||
io.mmap ;
|
||||
IN: io.unix.mmap
|
||||
|
||||
: open-r/w ( path -- fd ) O_RDWR file-mode open dup io-error ;
|
||||
: open-r/w ( path -- fd ) O_RDWR file-mode open-file ;
|
||||
|
||||
: mmap-open ( length prot flags path -- alien fd )
|
||||
>r f -roll r> open-r/w [ 0 mmap ] keep
|
||||
|
|
Loading…
Reference in New Issue