OS/2 Shareware BBS: 10 Tools/10-Tools.zip/rbemx144.zip/ruby-1.4.4/sample/export.rb

Text File | 1998-01-16 | 419b | 41 lines

# method access permission
# output:
#    foobar
#    Foo

class Foo
  public :printf
  def baz
    print "baz\n"
  end
  private :baz

  def quux
    print "in QUUX "
    baz()
  end
end

def foobar
  print "foobar\n"
end

f = Foo.new
#Foo.private :printf
class Foo            # redefines foobar's scope
  public :foobar
end
f.foobar
f.printf "%s\n", Foo

f.quux

class Bar<Foo
  def quux
    super
    baz()
  end
end

Bar.new.quux