2012-10-17 09:56 UTC+0200 Viktor Szakats (harbour syenar.net)

* utils/hbmk2/hbmk2.prg
    + added note about the requirement of GPL license next to all
      hb_compile()/hb_compileFromBuf() calls.
This commit is contained in:
Viktor Szakats
2012-10-17 07:57:51 +00:00
parent e9b808ca71
commit cc14c1815c
2 changed files with 11 additions and 0 deletions

View File

@@ -16,6 +16,11 @@
The license applies to all entries newer than 2009-04-28.
*/
2012-10-17 09:56 UTC+0200 Viktor Szakats (harbour syenar.net)
* utils/hbmk2/hbmk2.prg
+ added note about the requirement of GPL license next to all
hb_compile()/hb_compileFromBuf() calls.
2012-10-17 09:20 UTC+0200 Viktor Szakats (harbour syenar.net)
* contrib/gtwvg/*.prg
* contrib/gtwvg/tests/*.prg

View File

@@ -7479,6 +7479,7 @@ STATIC FUNCTION hbmk_hb_compile( hbmk, ... )
RETURN hb_compile( ... )
ELSE
cSaveCP := hb_cdpSelect( hbmk[ _HBMK_cCPPRG ] )
/* We can use this function as this is a GPL licenced application */
xRetVal := hb_compile( ... )
hb_cdpSelect( cSaveCP )
ENDIF
@@ -7493,6 +7494,7 @@ STATIC FUNCTION hbmk_hb_compileBuf( hbmk, ... )
RETURN hb_compileBuf( ... )
ELSE
cSaveCP := hb_cdpSelect( hbmk[ _HBMK_cCPPRG ] )
/* We can use this function as this is a GPL licenced application */
xRetVal := hb_compileBuf( ... )
hb_cdpSelect( cSaveCP )
ENDIF
@@ -8742,6 +8744,7 @@ STATIC PROCEDURE PlugIn_Load( hbmk, cFileName )
ENDIF
IF ! lOK .AND. !( Lower( cExt ) == ".hrb" ) /* Optimization: Don't try to load it as .prg if the extension is .hrb */
cType := I_( "(source)" )
/* We can use this function as this is a GPL licenced application */
cFile := hb_compileFromBuf( cFile, "-n2", "-w3", "-es2", "-q0", "-i" + hbmk[ _HBMK_cHB_INSTALL_INC ], "-D" + _HBMK_PLUGIN )
IF ! Empty( cFile )
hrb := hb_hrbLoad( HB_HRB_BIND_FORCELOCAL, cFile )
@@ -12439,6 +12442,7 @@ STATIC PROCEDURE __hbshell( cFile, ... )
AAdd( aINCPATH, "-I" + tmp )
NEXT
/* We can use this function as this is a GPL licenced application */
cFile := hb_compileBuf( hbmk_CoreHeaderFiles(), hb_ProgName(), "-n2", "-w", "-es2", "-q0", ;
hb_ArrayToParams( aINCPATH ), "-D" + _HBMK_SHELL, cFile )
IF cFile == NIL
@@ -12754,6 +12758,7 @@ STATIC FUNCTION __hbshell_plugins_load( hPlugins, aParams )
plugin[ _PLUGIN_hHRB ] := NIL
IF !( Lower( hb_FNameExt( cFile:__enumKey() ) ) == ".hrb" )
/* We can use this function as this is a GPL licenced application */
cFile := hb_compileFromBuf( cFile, hbmk_CoreHeaderFiles(), hb_ProgName(), "-n2", "-w", "-es2", "-q0" )
ENDIF
@@ -13105,6 +13110,7 @@ STATIC PROCEDURE __hbshell_Exec( cCommand )
BEGIN SEQUENCE WITH {| oErr | __hbshell_Err( oErr, cCommand ) }
/* We can use this function as this is a GPL licenced application */
cHRB := hb_compileFromBuf( cFunc, hb_ProgName(), "-n2", "-q2" )
IF Empty( cHRB )
Eval( ErrorBlock(), I_( "Syntax error." ) )