Initial data commit

Task/Loops-Do-while/Julia/loops-do-while-1.julia

@@ -0,0 +1,14 @@
+julia> i = 0
+0
+
+julia> while true
+           println(i)
+           i += 1
+           i % 6 == 0 && break
+       end
+0
+1
+2
+3
+4
+5

Task/Loops-Do-while/Julia/loops-do-while-2.julia

@@ -0,0 +1,26 @@
+julia> @eval macro $(:do)(block, when::Symbol, condition)
+           when ≠ :when && error("@do expected `when` got `$s`")
+           quote
+               let
+                   $block
+                   while $condition
+                       $block
+                   end
+               end
+           end |> esc
+       end
+@do (macro with 1 method)
+
+julia> i = 0
+0
+
+julia> @do begin
+           @show i
+           i += 1
+       end when i % 6 ≠ 0
+i = 0
+i = 1
+i = 2
+i = 3
+i = 4
+i = 5

Task/Loops-Do-while/Julia/loops-do-while-3.julia

@@ -0,0 +1,25 @@
+julia> macro do_while(condition, block)
+           quote
+               let
+                   $block
+                   while $condition
+                       $block
+                   end
+               end
+           end |> esc
+       end
+@do_while (macro with 1 method)
+
+julia> i = 0
+0
+
+julia> @do_while i % 6 ≠ 0 begin
+           @show i
+           i += 1
+       end
+i = 0
+i = 1
+i = 2
+i = 3
+i = 4
+i = 5