On Fri, 27 May 2011 18:35:47 +0200
Michael Wood wrote:
> > And instead of exiting, it "hangs" in this state for a number of
> > seconds before finally quitting. Why is that so and how can I fix
> > that?
> >
> > I tried calling (System/exit 0) in the end, but then it didn't even
> > display anyth
On 27 May 2011 18:28, Marek Kubica wrote:
> Hi,
>
> I wrote this script:
>
> (def number (ref 0))
> (def add1 (partial + 1))
> (def num-threads (Integer/parseInt (first *command-line-args*)))
> (def increments (Integer/parseInt (second *command-line-args*)))
>
> (defn add-number [field times]
> (
Hi,
I wrote this script:
(def number (ref 0))
(def add1 (partial + 1))
(def num-threads (Integer/parseInt (first *command-line-args*)))
(def increments (Integer/parseInt (second *command-line-args*)))
(defn add-number [field times]
(dorun (repeatedly times
(fn []