aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions
RosettaCodeData/Task/Loops-Break/Arc/loops-break.arc

8 lines
131 B
Text
Raw Permalink Normal View History

September 2017 Update
2017-09-23 10:01:46 +02:00
(point break
(while t
(let x (rand 20)
(prn "a: " x)
June 2018 Update
2018-06-22 20:57:24 +00:00
(if (is x 10)
September 2017 Update
2017-09-23 10:01:46 +02:00
(break)))
(prn "b: " (rand 20))))
Reference in a new issue Copy permalink