diff --git a/harbour/ChangeLog b/harbour/ChangeLog index fc29cf9f8c..67c43ca2e7 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,14 @@ past entries belonging to author(s): Viktor Szakats. */ +2009-06-29 13:33 UTC+0200 Viktor Szakats (harbour.01 syenar.hu) + * source/vm/arrays.c + * source/rtl/dates.c + ! Fixed TRACE calls. + + * utils/hbmk2/hbmk2.prg + * Minor. + 2009-06-29 12:02 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/source/rdd/dbfntx/dbfntx1.c ! fixed typo in recent modification (it was causing GPF) @@ -38,8 +46,8 @@ * harbour/contrib/hbxbp/xbptreeview.prg * harbour/contrib/hbxbp/xbpwindow.prg + Added :setPointer() method to change the cursor shape for a widget. - ! Advanced implementation of Presentation Parameters. Now the - base structure is almost like Xbase++ one. About to + ! Advanced implementation of Presentation Parameters. Now the + base structure is almost like Xbase++ one. About to generate a Style Sheet based on PresParametrs array. ! Code tweaked more organized. diff --git a/harbour/source/rtl/dates.c b/harbour/source/rtl/dates.c index 2fce0f05fd..d5a5477086 100644 --- a/harbour/source/rtl/dates.c +++ b/harbour/source/rtl/dates.c @@ -365,7 +365,7 @@ long hb_dateUnformat( const char * szDate, const char * szDateFormat ) { long lDate; - HB_TRACE(HB_TR_DEBUG, ("hb_dateFormat(%s, %p, %s)", szDate, szFormattedDate, szDateFormat)); + HB_TRACE(HB_TR_DEBUG, ("hb_dateFormat(%s, %s)", szDate, szDateFormat)); hb_dateUnformatRaw( szDate, szDateFormat, &lDate ); diff --git a/harbour/source/vm/arrays.c b/harbour/source/vm/arrays.c index 1a68cb093c..8410be5f4a 100644 --- a/harbour/source/vm/arrays.c +++ b/harbour/source/vm/arrays.c @@ -714,7 +714,7 @@ BOOL hb_arraySetTD( PHB_ITEM pArray, ULONG ulIndex, double dTimeStamp ) BOOL hb_arraySetTDT( PHB_ITEM pArray, ULONG ulIndex, LONG lJulian, LONG lMilliSec ) { - HB_TRACE(HB_TR_DEBUG, ("hb_arraySetTDT(%p, %lu, %lf)", pArray, ulIndex, lJulian, lMilliSec)); + HB_TRACE(HB_TR_DEBUG, ("hb_arraySetTDT(%p, %lu, %lu, %lu)", pArray, ulIndex, lJulian, lMilliSec)); if( HB_IS_ARRAY( pArray ) && ulIndex > 0 && ulIndex <= pArray->item.asArray.value->ulLen ) { diff --git a/harbour/utils/hbmk2/hbmk2.prg b/harbour/utils/hbmk2/hbmk2.prg index eda8e3058f..46b29aa9b5 100644 --- a/harbour/utils/hbmk2/hbmk2.prg +++ b/harbour/utils/hbmk2/hbmk2.prg @@ -3984,6 +3984,7 @@ FUNCTION hbmk( aArgs, /* @ */ lPause, /* @ */ lUTF8 ) #else cBin_Cprs := NIL + cOpt_Cprs := "" cOpt_CprsMin := "" cOpt_CprsMax := ""