Andrew Clarke wrote:
> Ummmm, has anyone actually executed the loop/break code? Shouldn't it be
> 
> procedure main()
>    repeat (write("\na: ", ?20 - 1) ~= 10 & write("b: ", ?20 - 1)) | break
> end
> 
> noting that I've added a few strings to really make it clear which write is 
> emitting which number.

This looks like fun.  While I doubt this is worth putting into
Rosetta Code, here's another approach (same strings added as above):

procedure main()
     every |(10 ~= write("\na: ", ?20 - 1), write("b: ", ?20 - 1))
end


-- 
Steve Wampler     {[email protected]}
The gods that smiled upon your birth are laughing now. -- fortune cookie

------------------------------------------------------------------------------
Download Intel® Parallel Studio Eval
Try the new software tools for yourself. Speed compiling, find bugs
proactively, and fine-tune applications for parallel performance.
See why Intel Parallel Studio got high marks during beta.
http://p.sf.net/sfu/intel-sw-dev
_______________________________________________
Unicon-group mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/unicon-group

Reply via email to