From 2cca1f30b4326a041cf34e294b701009d763a16e Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Wed, 24 Jun 2009 18:40:23 +0000 Subject: [PATCH] 2009-06-24 20:37 UTC+0200 Viktor Szakats (harbour.01 syenar.hu) * source/vm/memvars.c - Deleted hb_fsCommit() as non CA-Cl*pper compatible. I'll let others decide what to do with this patch. * contrib/hbclipsm/date.c ! Changed hb_parnl() calls used to extract dates to hb_pardl(). --- harbour/ChangeLog | 8 ++++++++ harbour/contrib/hbclipsm/date.c | 4 ++-- harbour/source/vm/memvars.c | 1 - 3 files changed, 10 insertions(+), 3 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index ba7b9e39cc..435676b708 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,14 @@ past entries belonging to author(s): Viktor Szakats. */ +2009-06-24 20:37 UTC+0200 Viktor Szakats (harbour.01 syenar.hu) + * source/vm/memvars.c + - Deleted hb_fsCommit() as non CA-Cl*pper compatible. + I'll let others decide what to do with this patch. + + * contrib/hbclipsm/date.c + ! Changed hb_parnl() calls used to extract dates to hb_pardl(). + 2009-06-24 08:40 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) * harbour/contrib/hbqt/Makefile_gen * harbour/contrib/hbqt/hbqt_qapplication.cpp diff --git a/harbour/contrib/hbclipsm/date.c b/harbour/contrib/hbclipsm/date.c index cd77b78346..cb7245fc2e 100644 --- a/harbour/contrib/hbclipsm/date.c +++ b/harbour/contrib/hbclipsm/date.c @@ -67,7 +67,7 @@ HB_FUNC( MDY ) int iYearLen; int iLen; - hb_dateDecode( hb_parnl( 1 ), &iYear, &iMonth, &iDay ); + hb_dateDecode( hb_pardl( 1 ), &iYear, &iMonth, &iDay ); hb_dateFormat( hb_pardsbuff( szDate, 1 ), szFormatted, "MM/DD/YYYY" ); iLen = strlen( hb_dateCMonth( iMonth ) ); @@ -97,7 +97,7 @@ HB_FUNC( DMY ) int iYearLen; int iLen; - hb_dateDecode( hb_parnl( 1 ), &iYear, &iMonth, &iDay ); + hb_dateDecode( hb_pardl( 1 ), &iYear, &iMonth, &iDay ); hb_dateFormat( hb_pardsbuff( szDate, 1 ), szFormatted, "MM/DD/YYYY" ); iLen = strlen( hb_dateCMonth( iMonth ) ); diff --git a/harbour/source/vm/memvars.c b/harbour/source/vm/memvars.c index 5668c94178..b98dc3d106 100644 --- a/harbour/source/vm/memvars.c +++ b/harbour/source/vm/memvars.c @@ -1514,7 +1514,6 @@ HB_FUNC( __MVSAVE ) buffer[ 0 ] = '\x1A'; hb_fsWrite( fhnd, buffer, 1 ); - hb_fsCommit( fhnd ); hb_fsClose( fhnd ); }