factor/basis/io/files/unique/unix/unix.factor

! Copyright (C) 2008 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: kernel io.ports io.backend.unix math.bitwise
unix system io.files.unique ;
IN: io.files.unique.unix

: open-unique-flags ( -- flags )
    { O_RDWR O_CREAT O_EXCL } flags ;

M: unix (touch-unique-file) ( path -- )
    open-unique-flags file-mode open-file close-file ;

M: unix default-temporary-directory ( -- path ) "/tmp" ;