diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 609ddc3942..c8a7efc3ea 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,12 @@ The license applies to all entries newer than 2009-04-28. */ +2012-05-05 20:30 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) + * contrib/hbqt/hbmk2_qt.hbs + * Optimized: HB_ISLOG( n ) ? hb_parl( n ) : false | true ) + => + hb_parl( n ) | hb_parldef( n, true ) + 2012-05-05 19:44 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) * contrib/hbqt/hbmk2_qt.hbs ! Fixed: to take use of the hbqt_par_isDerivedFrom() completely. diff --git a/harbour/contrib/hbqt/hbmk2_qt.hbs b/harbour/contrib/hbqt/hbmk2_qt.hbs index e496935a9b..9121ee8bed 100644 --- a/harbour/contrib/hbqt/hbmk2_qt.hbs +++ b/harbour/contrib/hbqt/hbmk2_qt.hbs @@ -2692,7 +2692,7 @@ METHOD HbQtSource:parseProto( cProto, fBody_ ) CASE oArg:cCast == "bool" s := "hb_parl( " + cHBIdx + " )" IF ! Empty( oArg:cDefault ) - oArg:cBody := "( HB_ISLOG( " + cHBIdx + " ) ? " + s + " : " + oArg:cDefault + " )" + oArg:cBody := iif( oArg:cDefault == "false", s, "hb_parldef( " + cHBIdx + ", true )" ) ELSE oArg:cBody := s ENDIF