2010-08-06 10:46 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)

* utils/hbmk2/hbmk2.prg
    ! Fixed to not propagate _ERRLEV_STOP from sub-projects.
    % -stop will not stop processing any further cmdline options.
    * Avoided one dangerous IF instruction.

  * contrib/hbqt/hbqt_commons.hbm
    % If static mode is not requested stop before loading plugins.

  * config/global.mk
    ! Always set HB_REBUILD_* options to 'no' when HB_BUILD_PKG=yes.
This commit is contained in:
Viktor Szakats
2010-08-06 08:46:36 +00:00
parent ab42d34ab1
commit e5c3e08baa
4 changed files with 29 additions and 8 deletions

View File

@@ -16,6 +16,18 @@
The license applies to all entries newer than 2009-04-28.
*/
2010-08-06 10:46 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* utils/hbmk2/hbmk2.prg
! Fixed to not propagate _ERRLEV_STOP from sub-projects.
% -stop will not stop processing any further cmdline options.
* Avoided one dangerous IF instruction.
* contrib/hbqt/hbqt_commons.hbm
% If static mode is not requested stop before loading plugins.
* config/global.mk
! Always set HB_REBUILD_* options to 'no' when HB_BUILD_PKG=yes.
2010-08-06 10:12 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* debian/rules
* package/harbour.spec

View File

@@ -181,6 +181,8 @@ ifeq ($(HB_INIT_DONE),)
export HB_BUILD_DEBUG := no
export HB_BUILD_SHARED := no
export HB_INSTALL_IMPLIB := no
export HB_REBUILD_EXTERN := no
export HB_REBUILD_PARSER := no
endif
# Can't build shared tools if we don't create dlls

View File

@@ -9,8 +9,8 @@
# Common settings for all hbqt subcomponents (static mode)
hbqt_common.hbm
-stop{!HB_QT_BUILD_STATIC|!allwin}
hbqt_common.hbm
-cflag=-DQT_NODLL

View File

@@ -1863,7 +1863,8 @@ FUNCTION hbmk2( aArgs, nArgTarget, /* @ */ lPause, nLevel )
ENDIF
ELSE
tmp := HBM_Load( hbmk, aParams, PathSepToSelf( cParam ), 1, .T. ) /* Load parameters from script file */
IF tmp != 0
IF tmp != _ERRLEV_OK .AND. ;
tmp != _ERRLEV_STOP
RETURN tmp
ENDIF
ENDIF
@@ -1871,7 +1872,8 @@ FUNCTION hbmk2( aArgs, nArgTarget, /* @ */ lPause, nLevel )
( Lower( FNameExtGet( cParam ) ) == ".hbm" .OR. ;
Lower( FNameExtGet( cParam ) ) == ".hbp" )
tmp := HBM_Load( hbmk, aParams, PathSepToSelf( cParam ), 1, .T. ) /* Load parameters from script file */
IF tmp != 0
IF tmp != _ERRLEV_OK .AND. ;
tmp != _ERRLEV_STOP
RETURN tmp
ENDIF
OTHERWISE
@@ -2286,6 +2288,7 @@ FUNCTION hbmk2( aArgs, nArgTarget, /* @ */ lPause, nLevel )
OutStd( hb_StrFormat( I_( "%1$s" ), cParam ) + _OUT_EOL )
ENDIF
ENDIF
EXIT
CASE Left( cParamL, Len( "-echo=" ) ) == "-echo="
@@ -9043,7 +9046,8 @@ STATIC FUNCTION HBM_Load( hbmk, aParams, cFileName, nNestingLevel, lProcHBP )
ENDIF
/* TODO: Modify '@script.ext' (@ prefixes) inclusion to not inherit path from parent */
nResult := HBM_Load( hbmk, aParams, PathMakeAbsolute( PathSepToSelf( cParam ), cFileName ), nNestingLevel + 1, .T. ) /* Load parameters from script file */
IF nResult != 0
IF nResult != _ERRLEV_OK .AND. ;
nResult != _ERRLEV_STOP
RETURN nResult
ENDIF
ELSE
@@ -9053,7 +9057,8 @@ STATIC FUNCTION HBM_Load( hbmk, aParams, cFileName, nNestingLevel, lProcHBP )
Lower( FNameExtGet( cParam ) ) == ".hbm"
IF nNestingLevel < _HBMK_NEST_MAX
nResult := HBM_Load( hbmk, aParams, PathMakeAbsolute( PathSepToSelf( cParam ), cFileName ), nNestingLevel + 1, .T. ) /* Load parameters from script file */
IF nResult != 0
IF nResult != _ERRLEV_OK .AND. ;
nResult != _ERRLEV_STOP
RETURN nResult
ENDIF
ELSE
@@ -9193,8 +9198,10 @@ STATIC FUNCTION ArchCompFilter( hbmk, cItem )
bFilter := NIL
END SEQUENCE
IF ISBLOCK( bFilter ) .AND. ISLOGICAL( xResult := Eval( bFilter, hbmk ) ) .AND. xResult
RETURN cItem
IF ISBLOCK( bFilter ) .AND. ISLOGICAL( xResult := Eval( bFilter, hbmk ) )
IF xResult
RETURN cItem
ENDIF
ENDIF
RETURN ""