goto.rb

# Global GOTO table.
$LABELS = Hash.new

def label(name)
  $LABELS[name] = callcc {|cc| cc }
end

def goto(name)
  $LABELS[name].call
end


# Infinite loop!

label :loop

puts "HELLO!"

goto :loop