fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added support for 'Super' keyword

Browse Source
This commit is contained in:
Antonio Linares
1999-07-28 17:52:39 +00:00
parent cfb6e30151
commit 6a1e9770bb
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
harbour/include/classes.ch
View File

@@ -35,7 +35,7 @@
oClass = TClass():New( <(ClassName)> [,<(SuperClass)>] ) ;;
#define _CLASS_NAME_ <ClassName> ;;
#translate CLSMETH <ClassName> <MethodName>() => @<ClassName>_<MethodName>() ;
[ ; #define _Super_ <(SuperClass)> ]
[ ; #translate Super : => ::<SuperClass>: ]
#xcommand DATA <DataName1> [,<DataNameN>] => ;
oClass:AddData( <(DataName1)> ) [; oClass:AddData( <(DataNameN)> ) ]