## #class(#byte) Stdio(Object) from 'stdio'. #class(#byte) Stdio(Object) { #method(#class) _newInstSize { } #method(#class) new: size { ##self prohibited ##raise exception. prohibited... ^(super new: (self _newInstSize)) } #method(#class) new { ##self prohibited ##raise exception. prohibited... ^(super new: (self _newInstSize)) } #method(#class) open: name for: mode { ^(super new: 1) open: name for: mode } #method open: name for: mode { } #method close { } } #extend Stdio { #method xxxx { self basicSize dump. } } #class(#byte) Stdio2(Stdio) { #method(#class) new { ##self prohibited ##raise exception. prohibited... ^(super new). } }