play.cr

# crystal
# https://crystal-lang.org/docs/syntax_and_semantics/blocks_and_procs.html
arr = [1, 2, 3, 4, 5]

def b(arr)
  loop do
  	arr.each do |x|
      yield x
    end
  end
end

b(arr) do |x|
  break if x == 3
end
p "End" # => "End"


def c(arr)
  arr.each do |x|
    yield x
  end
end

c(arr) do |x|
  break if x == 3
end
p "End" # => "End"


def d(arr)
  loop do
    loop do
      arr.each do |x|
        yield x
      end
    end    
  end
end

d(arr) do |x|
  break if x == 3
end
p "End" # => End


def e(arr)
  i = 0
  loop do
    arr.each do |x|
      break
    end
    i = i + 1
    return false if i == 2
  end  
  
  true
end

if e(arr)
  p "End" # No exec
else
  p "loop!!" #=> "loop!!"
end