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

2000-10-09 22:15 UTC+0200 JFL (mafact) <jfl@mafact.com>

Browse Source
This commit is contained in:
Jean-Francois Lefebvre
2000-10-09 20:10:32 +00:00
parent e9b5aec305
commit 5901d1d3c8
2 changed files with 7 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/include/hbclass.ch
View File

@@ -415,15 +415,15 @@ DECLARE TClass ;
s_oClass:AddMethod( "_" + <(MethodName)>, CLSMETH _CLASS_NAME_ <MethodName>() )
#xcommand ACCESS <AccessName> [ AS <type> ] => ;
_HB_MEMBER <AccesName>() [ AS <type> ];;
_HB_MEMBER <AccessName>() [ AS <type> ];;
s_oClass:AddMethod( <(AccessName)>, CLSMETH _CLASS_NAME_ <AccessName>(), HB_OO_CLSTP_EXPORTED + HB_OO_CLSTP_READONLY )
#xcommand ACCESS <AccessName> [ AS <type> ] INLINE [Local <v>,] <code,...> => ;
_HB_MEMBER <AccesName>() [ AS <type> ];;
_HB_MEMBER <AccessName>() [ AS <type> ];;
s_oClass:AddInline( <(AccessName)>, {|Self [,<v>] | <code> }, HB_OO_CLSTP_EXPORTED + HB_OO_CLSTP_READONLY )
#xcommand ACCESS <AccessName> [ AS <type> ] DEFERRED => ;
_HB_MEMBER <AccesName>() [ AS <type> ];;
_HB_MEMBER <AccessName>() [ AS <type> ];;
s_oClass:AddVirtual( <(AccessName)> )
#xcommand ASSIGN <AssignName>( [<params,...>] ) [ AS <type> ] => ;