tools.deploy.test: cut Windows some slack

db4
Slava Pestov 2009-09-12 13:24:45 -05:00
parent 78e5dfcc8b
commit 7ae147c3bf
1 changed files with 5 additions and 1 deletions

6
basis/tools/deploy/test/test.factor Normal file → Executable file
View File

@ -12,7 +12,11 @@ IN: tools.deploy.test
: small-enough? ( n -- ? )
[ "test.image" temp-file file-info size>> ]
[ cell 4 / * cpu ppc? [ 100000 + ] when ] bi*
[
cell 4 / *
cpu ppc? [ 100000 + ] when
os windows? [ 150000 + ] when
] bi*
<= ;
: run-temp-image ( -- )