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

2012-11-02 16:18 UTC+0100 Viktor Szakats (harbour syenar.net)

Browse Source 
* utils/hbmk2/hbmk2.prg
    ! minor follow up, fixing to hint function names starting
      with an underscore
This commit is contained in:
Viktor Szakats
2012-11-02 15:19:13 +00:00
parent 1ceca51f53
commit 7967592720
2 changed files with 6 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -16,6 +16,11 @@
The license applies to all entries newer than 2009-04-28.
*/
2012-11-02 16:18 UTC+0100 Viktor Szakats (harbour syenar.net)
* utils/hbmk2/hbmk2.prg
! minor follow up, fixing to hint function names starting
with an underscore
2012-11-02 16:09 UTC+0100 Viktor Szakats (harbour syenar.net)
* utils/hbmk2/hbmk2.prg
+ added experimental feature, which will hint .hbc and -l

2
harbour/utils/hbmk2/hbmk2.prg
View File

@@ -12274,7 +12274,7 @@ STATIC FUNCTION ExtractHarbourSymbols( cString )
LOCAL cOldCP
cOldCP := hb_cdpSelect( "EN" )
IF ! Empty( pRegex := hb_regexComp( "HB_FUN_([A-Z][A-Z0-9_]*)", .T., .T. ) )
IF ! Empty( pRegex := hb_regexComp( "HB_FUN_([A-Z_][A-Z_0-9]*)", .T., .T. ) )
aList := hb_regexAll( pRegex, StrTran( cString, Chr( 13 ) ),,,,, .T. )
FOR EACH tmp IN aList
tmp := tmp[ 2 ]