crystal_for_loop_macros.cr

macro for(definition, condition, incrimentation, &block)
  {{definition}}
  while {{condition}}
    {{block.body}}
    {{incrimentation}}
  end
end

macro for(expr)
  ({{expr.args.first.args.first}}).each do |{{expr.name.id}}|
    {{expr.args.first.block.body}}
  end
end

# Regular for loop
for x = 0, x < 5, x += 1 do
  puts x
end

# For-in loop
for x in 1..5 do
  puts x
end