steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
factor/basis/io/files/temp/temp.factor

27 lines
711 B
Factor
Raw Normal View History

io.files.temp: use OS tmp dir; add cache-directory Change temp-directory to return an OS-sanctioned temporary directory instead of "resource:temp". Add a new function cache-directory to return an OS-sanctioned directory for storing staging images etc. Fixes #365. Windows implementation needs to be finished and tested.
2012-03-31 17:45:59 -04:00
! (c)2012 Joe Groff bsd license
io.files.temp: adding with-temp-directory and with-cache-directory.
2012-06-18 15:22:59 -04:00
USING: combinators io.directories io.pathnames kernel system
vocabs ;
Oops
2008-12-15 03:02:22 -05:00
IN: io.files.temp
io.files.temp: use OS tmp dir; add cache-directory Change temp-directory to return an OS-sanctioned temporary directory instead of "resource:temp". Add a new function cache-directory to return an OS-sanctioned directory for storing staging images etc. Fixes #365. Windows implementation needs to be finished and tested.
2012-03-31 17:45:59 -04:00
HOOK: temp-directory os ( -- path )
HOOK: cache-directory os ( -- path )
Oops
2008-12-15 03:02:22 -05:00
: temp-file ( name -- path )
io.files.temp: use OS tmp dir; add cache-directory Change temp-directory to return an OS-sanctioned temporary directory instead of "resource:temp". Add a new function cache-directory to return an OS-sanctioned directory for storing staging images etc. Fixes #365. Windows implementation needs to be finished and tested.
2012-03-31 17:45:59 -04:00
temp-directory prepend-path ;
io.files.temp: adding with-temp-directory and with-cache-directory.
2012-06-18 15:22:59 -04:00
: with-temp-directory ( quot -- )
[ temp-directory ] dip with-directory ; inline
io.files.temp: use OS tmp dir; add cache-directory Change temp-directory to return an OS-sanctioned temporary directory instead of "resource:temp". Add a new function cache-directory to return an OS-sanctioned directory for storing staging images etc. Fixes #365. Windows implementation needs to be finished and tested.
2012-03-31 17:45:59 -04:00
: cache-file ( name -- path )
cache-directory prepend-path ;
io.files.temp: adding with-temp-directory and with-cache-directory.
2012-06-18 15:22:59 -04:00
: with-cache-directory ( quot -- )
[ cache-directory ] dip with-directory ; inline
io.files.temp: use OS tmp dir; add cache-directory Change temp-directory to return an OS-sanctioned temporary directory instead of "resource:temp". Add a new function cache-directory to return an OS-sanctioned directory for storing staging images etc. Fixes #365. Windows implementation needs to be finished and tested.
2012-03-31 17:45:59 -04:00
{
{ [ os windows? ] [ "io.files.temp.windows" ] }
{ [ os macosx? ] [ "io.files.temp.macosx" ] }
{ [ os unix? ] [ "io.files.temp.unix" ] }
[ "unknown io.files.temp platform" throw ]
} cond require