fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2012-05-05 20:30 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)

Browse Source 
* contrib/hbqt/hbmk2_qt.hbs
    * Optimized: HB_ISLOG( n ) ? hb_parl( n ) : false | true )
                    =>
                 hb_parl( n ) | hb_parldef( n, true )
This commit is contained in:
Pritpal Bedi
2012-05-06 05:33:42 +00:00
parent b762c675fe
commit 44dfaad739
2 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -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.

2
harbour/contrib/hbqt/hbmk2_qt.hbs
View File

@@ -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