From 44dfaad7395b69573ada9cc35de7a982ba190152 Mon Sep 17 00:00:00 2001 From: Pritpal Bedi Date: Sun, 6 May 2012 05:33:42 +0000 Subject: [PATCH] 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 ) --- harbour/ChangeLog | 6 ++++++ harbour/contrib/hbqt/hbmk2_qt.hbs | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) 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