Uh forgot to .shutdown the exec, proper cleanup is important otherwise the 
threads might hang arround a bit.

On Wednesday, September 17, 2014 1:26:00 PM UTC+2, Thomas Heller wrote:
>
> core.sync is more about coordination and communication than about doing 
> things in parallel, thats just a pleasant side effect.
>
> In your case you don't need anything core.async provides. You could either 
> use reducers or java.util.concurrent.ExecutorService.
>
> (let [exec (Executors/newFixedThreadPool 4)
>       process (fn [it]
>                 (.submit exec #(long-running-widget-processor it)))
>       get (fn [future]
>             (.get future))]
>   (->> widgets
>        (mapv process)
>        (mapv get)))
>
> This skips the partitioning of the inputs and lets the Threadpool deal 
> with spreading the work. This probably is optimal to ensure that all 4 
> threads are busy until all work is done. (Note: I did not run this code)
>
> Reducers would be good if the number of items processed is large enough 
> and you are doing pure number crunching with no I/O. Otherwise the 
> fork/join probably costs too much.
>
> HTH,
> /thomas
>
> On Friday, September 5, 2014 7:46:02 AM UTC+2, Beau Fabry wrote:
>>
>> Is the kinda ugly  constant (doall usage a sign that I'm doing something 
>> silly?
>>
>> (let [num-workers 4
>>       widgets-per-worker (inc (int (/ (count widgets) num-workers)))
>>       bucketed-widgets (partition-all widgets-per-worker widgets)
>>       workers (doall (map (fn [widgets]
>>                               (thread
>>                                 (doseq [widget widgets]
>>                                   (long-running-widget-processor widget))
>>                                 true))
>>                            bucketed-widgets))]
>>   (doall (map <!! workers)))
>>
>> https://gist.github.com/bfabry/ad830b1888e4fc550f88
>>
>> All comments appreciated :-)
>>
>> Cheers,
>> Beau
>>
>

-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
--- 
You received this message because you are subscribed to the Google Groups 
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.

Reply via email to