super
class A:
foo x:
print "from A: $x"
class B extends A:
foo x:
super (x + 1)
class Base:
f m/string: print "Base: $m"
b: f "b"
class Derived extends Base:
f m/string: print "Derived: $m"
d: b
main:
c := Derived
c.d
super
f
class Base:
static f m/string: print "Base: $m"
b: f "b"
class Derived extends Base:
static f m/string: print "Derived: $m"
d: b
main:
c := Derived
c.d
super
this
f
f