timeout.cr

def log(msg)
  puts "#{Fiber.current.name}: #{msg}"
end

def maybe_inf_op
  Channel(Int32).new.tap do |fin_ch|
    spawn do
      loop do
        s = "aaa" * rand(10)    
      end
      fin_ch.send(777)
    end
  end
end

select
  when maybe_inf_op.receive
    log "Ooohoo!"
  when timeout 3.seconds
    log "timeout :("
end