steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge branch 'modern-harvey3' of factorcode.org:/git/factor into modern-harvey3

modern-harvey3-triple
Doug Coleman 2018-08-24 16:49:44 -05:00
parent fdb5383f19 de903b4ee2
commit d37ca71375
3 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
basis/io/files/temp/temp.factor
View File

@ -12,7 +12,8 @@ SYMBOL: current-temp-directory
current-temp-directory get ; current-temp-directory get ;
: temp-file ( name -- path ) : temp-file ( name -- path )
temp-directory prepend-path ; temp-directory
[ make-directories ] [ prepend-path ] bi ;
: with-temp-directory ( quot -- ) : with-temp-directory ( quot -- )
[ temp-directory ] dip with-directory ; inline [ temp-directory ] dip with-directory ; inline

4
extra/modern/modern.factor
View File

@ -3,8 +3,8 @@
USING: arrays assocs combinators combinators.short-circuit USING: arrays assocs combinators combinators.short-circuit
continuations io.encodings.utf8 io.files kernel make math continuations io.encodings.utf8 io.files kernel make math
math.order modern.paths modern.slices sequences sequences.extras math.order modern.paths modern.slices sequences sequences.extras
sequences.generalizations sets shuffle splitting strings unicode sequences.generalizations sets shuffle splitting strings
vocabs.loader ; syntax.modern unicode vocabs.loader ;
IN: modern IN: modern
ERROR: string-expected-got-eof n string ; ERROR: string-expected-got-eof n string ;

2
extra/modern/out/out.factor
View File

@ -4,7 +4,7 @@ USING: accessors arrays assocs combinators.short-circuit
constructors continuations io io.encodings.utf8 io.files constructors continuations io io.encodings.utf8 io.files
io.streams.string kernel modern modern.paths modern.slices io.streams.string kernel modern modern.paths modern.slices
prettyprint sequences sequences.extras splitting strings prettyprint sequences sequences.extras splitting strings
vocabs.loader ; syntax.modern vocabs.loader ;
IN: modern.out IN: modern.out
: token? ( obj -- ? ) : token? ( obj -- ? )