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

cli.git: Use number of threads not cpus.

modern-harvey2
Doug Coleman 2017-08-17 20:35:44 -05:00
parent 7a554e302f
commit c7abd13d33
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
extra/cli/git/git.factor
View File

@ -2,11 +2,11 @@
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: arrays concurrency.combinators concurrency.semaphores fry USING: arrays concurrency.combinators concurrency.semaphores fry
io.directories io.files.info io.launcher io.pathnames kernel io.directories io.files.info io.launcher io.pathnames kernel
math namespaces sequences splitting system-info ; math namespaces sequences splitting system-info.linux ;
IN: cli.git IN: cli.git
SYMBOL: cli-git-num-parallel SYMBOL: cli-git-num-parallel
cli-git-num-parallel [ cpus 2 * ] initialize cli-git-num-parallel [ hyperthreads 2 * ] initialize
: git-clone-as ( ssh-url path -- process ) : git-clone-as ( ssh-url path -- process )
[ { "git" "clone" } ] 2dip 2array append run-process ; [ { "git" "clone" } ] 2dip 2array append run-process ;
@ -34,4 +34,3 @@ cli-git-num-parallel [ cpus 2 * ] initialize
_ [ update-repository ] with-semaphore _ [ update-repository ] with-semaphore
] parallel-each ] parallel-each
] with-ensure-directory ; ] with-ensure-directory ;