2688ce2212
* utils/hbmk2/hbmk2.prg
+ links to markdown and markdown to man-page converter tool
! minor cleanup to prev
* utils/hbmk2/hbmk2.1
* some updates
* ChangeLog.txt
! typos/updates in previous entry
* extras/hbdoc/*.prg
* src/rtl/memoedit.prg
* tests/clasinh.prg
* tests/classch.prg
* tests/inhprob.prg
! updated for new ::super: syntax
* src/rtl/itemseri.c
! fixed typo in latest modification:
'warning: use of unary operator that may be intended as compound assignment (+=)'
* contrib/hbgd/tests/test_out.prg
* contrib/hbhttpd/*
* contrib/hbtip/thtml.prg
* contrib/xhb/*.prg
* extras/httpsrv/*
* extras/guestbk/*
* website/faq/*.html
* website/samples/HowToBuildOnLinux.html
* website/third-party.html
* some steps to modernize old HTML
* extras/hbdoc/*.prg
* do not use [] as string delimiter
- tests/function.cfm
- website/samples/function.cfm.html
* .gitattributes
- obsolete file deleted
35 lines
445 B
Plaintext
35 lines
445 B
Plaintext
/*
|
|
* $Id$
|
|
*/
|
|
|
|
#include "hbclass.ch"
|
|
|
|
PROCEDURE Main()
|
|
|
|
LOCAL o := Three():New()
|
|
|
|
o:CheckIt()
|
|
|
|
RETURN
|
|
|
|
CREATE CLASS One
|
|
|
|
METHOD New() INLINE Self
|
|
METHOD Test() INLINE QOut( "One" )
|
|
METHOD CheckIt() INLINE ::Test()
|
|
|
|
ENDCLASS
|
|
|
|
CREATE CLASS Two FROM One
|
|
|
|
METHOD Test() INLINE ::super:Test()
|
|
METHOD CheckIt() INLINE ::super:CheckIt()
|
|
|
|
ENDCLASS
|
|
|
|
CREATE CLASS Three FROM Two
|
|
|
|
METHOD Test() INLINE QOut( "Three" )
|
|
|
|
ENDCLASS
|