2012-08-08 12:44 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)

- contrib/hbide/hbfunc.txt
    - Removed: hbfunc.txt

  * contrib/hbide/edit.prg
    % Applied: harbour.hbx instead of hbfunc.txt provided listing 
       of Harbour core functions. Thanks Viktor for the tip.

    TODO: set right the camel casing of some function groups,
          for example, dbSetOrder => DbSetOrder and its group.

harbour/ChangeLog

@@ -16,6 +16,17 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2012-08-08 12:44 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
+  - contrib/hbide/hbfunc.txt
+    - Removed: hbfunc.txt
+
+  * contrib/hbide/edit.prg
+    % Applied: harbour.hbx instead of hbfunc.txt provided listing 
+       of Harbour core functions. Thanks Viktor for the tip.
+
+    TODO: set right the camel casing of some function groups,
+          for example, dbSetOrder => DbSetOrder and its group.
+ 
 2012-08-08 10:50 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
   * contrib/hbide/edit.prg
     % Some more synchronization and code clean-up.

harbour/contrib/hbide/edit.prg

@@ -2950,7 +2950,8 @@ FUNCTION hbide_isHarbourFunction( cWord, cCased )
    IF empty( s_b_ )
       s_b_:= {=>}
       hb_hCaseMatch( s_b_, .f. )
-      a_:= hb_aTokens( strtran( hbide_getFileContentsFromResource( "hbfunc.txt" ), chr( 13 ) + chr( 10 ), chr( 10 ) ), chr( 10 ) )
+      //a_:= hb_aTokens( strtran( hbide_getFileContentsFromResource( "hbfunc.txt" ), chr( 13 ) + chr( 10 ), chr( 10 ) ), chr( 10 ) )
+      a_:= __hb_extern_get_exception_list( hbide_getHarbourHbx() )
       FOR EACH s IN a_
          IF ! empty( s )
             s := alltrim( s )
@@ -2994,3 +2995,26 @@ FUNCTION hbide_isUserFunction( cWord, cCased )
    RETURN .F.
 
 /*----------------------------------------------------------------------*/
+
+STATIC FUNCTION __hb_extern_get_exception_list( cFile )
+   LOCAL pRegex
+   LOCAL tmp
+   LOCAL aDynamic := {}
+
+   IF ! Empty( cFile ) .AND. ;
+      ! Empty( pRegex := hb_regexComp( "^DYNAMIC ([a-zA-Z0-9_]*)$", .T., .T. ) )
+      FOR EACH tmp IN hb_regexAll( pRegex, StrTran( cFile, Chr( 13 ) ),,,,, .T. )
+         AAdd( aDynamic, tmp[ 2 ] )
+      NEXT
+   ENDIF
+
+   RETURN aDynamic
+
+/*----------------------------------------------------------------------*/
+
+#pragma -km+
+
+FUNCTION hbide_getHarbourHbx()
+   #pragma __binarystreaminclude "harbour.hbx" | RETURN %s
+
+/*----------------------------------------------------------------------*/