#include "hbclass.ch"
function main()
local o := ttest():init()
o:setText( "a" )
? o:getText()
o := nil
return nil
class ttest
data text init ''
method init() constructor
method setText( text ) inline ::text := text
method getText() inline ::text
endclass
method init() class ttest
return self
Compiling 'test.prg'...
Class member 'TEXT' declaration without class definition.
Class member 'INIT' declaration without class definition.
Class member 'SETTEXT' declaration without class definition.
Class member 'GETTEXT' declaration without class definition.
4 errors