[PATCH 1/9] cleaning dead code in calc/scaddins

pjacquod pjacquod at alumni.ethz.ch
Sat Nov 20 08:54:01 PST 2010


---
 scaddins/source/analysis/analysis.cxx       |   17 +---
 scaddins/source/analysis/analysisadd.idl    |    5 -
 scaddins/source/analysis/analysishelper.cxx |  153 +--------------------------
 scaddins/source/analysis/analysishelper.hxx |    3 -
 4 files changed, 3 insertions(+), 175 deletions(-)

diff --git a/scaddins/source/analysis/analysis.cxx b/scaddins/source/analysis/analysis.cxx
index ea1494c..5c146c8 100644
--- a/scaddins/source/analysis/analysis.cxx
+++ b/scaddins/source/analysis/analysis.cxx
@@ -234,9 +234,6 @@ AnalysisAddIn::~AnalysisAddIn()
     if( pCDL )
         delete pCDL;
 
-//	if( pResMgr )			no delete, because _all_ resource managers are deleted _before_ this dtor is called
-//		delete pResMgr;
-
     if( pDefLocales )
         delete[] pDefLocales;
 }
@@ -420,7 +417,7 @@ STRING SAL_CALL AnalysisAddIn::getDisplayArgumentName( const STRING& aName, sal_
     if( p && nArg <= 0xFFFF )
     {
         sal_uInt16	nStr = p->GetStrIndex( sal_uInt16( nArg ) );
-        if( nStr /*&& nStr < 4*/ )
+        if( nStr )
             aRet = GetFuncDescrStr( p->GetDescrID(), nStr );
         else
             aRet = STRFROMANSI( "internal" );
@@ -438,7 +435,7 @@ STRING SAL_CALL AnalysisAddIn::getArgumentDescription( const STRING& aName, sal_
     if( p && nArg <= 0xFFFF )
     {
         sal_uInt16	nStr = p->GetStrIndex( sal_uInt16( nArg ) );
-        if( nStr /*&& nStr < 4*/ )
+        if( nStr )
             aRet = GetFuncDescrStr( p->GetDescrID(), nStr + 1 );
         else
             aRet = STRFROMANSI( "for internal use only" );
@@ -565,13 +562,6 @@ SEQofLocName SAL_CALL AnalysisAddIn::getCompatibilityNames( const STRING& aProgr
 
 // XAnalysis
 
-/*double SAL_CALL AnalysisAddIn::get_Test( constREFXPS&,
-    sal_Int32 nMode, double f1, double f2, double f3 ) THROWDEF_RTE
-{
-    return _Test( nMode, f1, f2, f3 );
-}*/
-
-
 /**
  * Workday
  */
@@ -793,7 +783,6 @@ double SAL_CALL AnalysisAddIn::getSeriessum( double fX, double fN, double fM, co
         sal_Int32		n1, n2;
         sal_Int32		nE1 = aCoeffList.getLength();
         sal_Int32		nE2;
-        //sal_Int32		nZ = 0;
 
         for( n1 = 0 ; n1 < nE1 ; n1++ )
         {
@@ -945,7 +934,6 @@ double SAL_CALL AnalysisAddIn::getBessely( double fNum, sal_Int32 nOrder ) THROW
     if( nOrder < 0 || fNum <= 0.0 )
         THROW_IAE;
 
-//	return yn( nOrder, fNum );
     double fRet = sca::analysis::BesselY( fNum, nOrder );
     RETURN_FINITE( fRet );
 }
@@ -1269,7 +1257,6 @@ STRING SAL_CALL AnalysisAddIn::getImsqrt( const STRING& aNum ) THROWDEF_RTE_IAE
 {
     Complex		z( aNum );
 
-//	z.Power( 0.5 );
     z.Sqrt();
 
     return z.GetString();
diff --git a/scaddins/source/analysis/analysisadd.idl b/scaddins/source/analysis/analysisadd.idl
index 32a94f7..2ebfd53 100644
--- a/scaddins/source/analysis/analysisadd.idl
+++ b/scaddins/source/analysis/analysisadd.idl
@@ -54,11 +54,6 @@ module addin
     */
     interface XAnalysis : com::sun::star::uno::XInterface
     {
-        /// _test.
-//      double get_Test(
-//                  [in] com::sun::star::beans::XPropertySet xOptions,
-//                  [in] long Mode, [in] double f1, [in] double f2, [in] double f3 );
-
         /// workday.
         long getWorkday(
                     [in] com::sun::star::beans::XPropertySet xOptions,
diff --git a/scaddins/source/analysis/analysishelper.cxx b/scaddins/source/analysis/analysishelper.cxx
index bf3c0f4..50075a9 100644
--- a/scaddins/source/analysis/analysishelper.cxx
+++ b/scaddins/source/analysis/analysishelper.cxx
@@ -51,8 +51,6 @@ using namespace                 ::com::sun::star;
 
 const FuncDataBase pFuncDatas[] =
 {
-    //                          UNIQUE or   INTPAR or
-    //         function name     DOUBLE      STDPAR     # of param  category
     FUNCDATA( Workday,          UNIQUE,     INTPAR,     3,          FDCat_DateTime ),
     FUNCDATA( Yearfrac,         UNIQUE,     INTPAR,     3,          FDCat_DateTime ),
     FUNCDATA( Edate,            UNIQUE,     INTPAR,     2,          FDCat_DateTime ),
@@ -282,7 +280,6 @@ sal_Int32 GetDiffDate360(
     {
         if( bUSAMethod && nDay1 != 30 )
         {
-            //aDate2 += 1;		-> 1.xx.yyyy
             nDay2 = 1;
             if( nMonth2 == 12 )
             {
@@ -433,7 +430,7 @@ sal_Int32 GetDiffDate( sal_Int32 nNullDate, sal_Int32 nStartDate, sal_Int32 nEnd
             DaysToDate( nEndDate, nD2, nM2, nY2 );
 
             sal_Bool		bLeap = IsLeapYear( nY1 );
-            sal_Int32		nDays, nMonths/*, nYears*/;
+            sal_Int32		nDays, nMonths;
 
             nMonths = nM2 - nM1;
             nDays = nD2 - nD1;
@@ -1013,71 +1010,6 @@ double GetOddfprice( sal_Int32 /*nNullDate*/, sal_Int32 /*nSettle*/, sal_Int32 /
     sal_Int32 /*nBase*/ ) THROWDEF_RTE_IAE
 {
     THROW_RTE;  // #87380#
-/*
-    double		fN = GetCoupnum( nNullDate, nSettle, nMat, nFreq, nBase ) - 1.0;
-    double		fNq = GetCoupnum( nNullDate, nSettle, nFirstCoup, nFreq, nBase ) - 1.0;
-    double		fDSC = GetCoupdaysnc( nNullDate, nSettle, nFirstCoup, nFreq, nBase );
-    double		fDSC_E = fDSC / GetCoupdays( nNullDate, nSettle, nMat, nFreq, nBase );
-    double		fNC = GetCoupnum( nNullDate, nIssue, nFirstCoup, nFreq, nBase );
-    sal_uInt32	nNC = sal_uInt32( fNC );
-    sal_uInt16	nMonthDelta = 12 / sal_uInt16( nFreq );
-
-    sal_uInt32	i;
-    double		f1YieldFreq = 1.0 + fYield / double( nFreq );
-    double		f100RateFreq = 100.0 * fRate / double( nFreq );
-
-    double*		pDC = new double[ nNC + 1 ];
-    double*		pNL = new double[ nNC + 1 ];
-    double*		pA = new double[ nNC + 1 ];
-
-    pDC[ 0 ] = pNL[ 0 ] = pA[ 0 ] = 1.0;
-
-    ScaDate aStartDate( nNullDate, nSettle, nBase );
-    ScaDate aNextCoup( nNullDate, nFirstCoup, nBase );
-    if( nNC )
-    {
-        pDC[ 1 ] = ScaDate::GetDiff( aStartDate, aNextCoup );
-        pNL[ 1 ] = GetCoupdays( nNullDate, nSettle, nFirstCoup, nFreq, nBase );
-        pA[ 1 ] = pDC[ 1 ];
-        ScaDate aPre;
-        for( i = 1 ; i <= nNC ; i++ )
-        {
-            aPre = aStartDate;
-            aStartDate.addMonths( nMonthDelta );
-            aNextCoup.addMonths( nMonthDelta );
-            pDC[ i ] = ScaDate::GetDiff( aPre, aStartDate );
-            pNL[ i ] = GetCoupdays( nNullDate, aStartDate.GetDate( nNullDate ), aNextCoup.GetDate( nNullDate ),
-                                        nFreq, nBase );
-            pA[ i ] = ScaDate::GetDiff( aStartDate, aNextCoup );
-        }
-    }
-
-    double		fT1 = fRedemp / pow( f1YieldFreq, fN + fNq + fDSC_E );
-
-    double		fT2 = 0.0;
-    for( i = 1 ; i <= nNC ; i++ )
-        fT2 += pDC[ i ] / pNL[ i ];
-    fT2 *= f100RateFreq / pow( f1YieldFreq, fNq + fDSC_E );
-
-    double		fT3 = 0.0;
-    for( double k = 2.0 ; k <= fN ; k++ )
-        fT3 += 1.0 / pow( f1YieldFreq, k - fNq + fDSC_E );
-    fT3 *= f100RateFreq;
-
-    double		fT4 = 0.0;
-    for( i = 1 ; i <= nNC ; i++ )
-        fT4 += pA[ i ] / pNL[ i ];
-    fT4 *= f100RateFreq;
-
-    if( nNC )
-    {
-        delete pDC;
-        delete pNL;
-        delete pA;
-    }
-
-    return fT1 + fT2 + fT3 - fT4;
-*/
 }
 
 
@@ -1161,56 +1093,6 @@ double GetOddfyield( sal_Int32 /*nNullDate*/, sal_Int32 /*nSettle*/, sal_Int32 /
     sal_Int32 /*nBase*/ ) THROWDEF_RTE_IAE
 {
     THROW_RTE;  // #87380#
-/*
-    //GetOddfprice( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nIssue,
-    //sal_Int32 nFirstCoup, double fRate, double fYield, double fRedemp, sal_Int32 nFreq,
-    //sal_Int32 nBase )
-    double		fPriceN = 0.0;
-    double		fYield1 = 0.0;
-    double		fYield2 = 1.0;
-    double		fPrice1 = GetOddfprice( nNullDate, nSettle, nMat, nIssue, nFirstCoup, fRate, fYield1, fRedemp, nFreq, nBase );
-    double		fPrice2 = GetOddfprice( nNullDate, nSettle, nMat, nIssue, nFirstCoup, fRate, fYield2, fRedemp, nFreq, nBase );
-    double		fYieldN = ( fYield2 - fYield1 ) * 0.5;
-
-    for( sal_uInt32 nIter = 0 ; nIter < 100 && fPriceN != fPrice ; nIter++ )
-    {
-        fPriceN = GetOddfprice( nNullDate, nSettle, nMat, nIssue, nFirstCoup, fRate, fYieldN, fRedemp, nFreq, nBase );
-
-        if( fPrice == fPrice1 )
-            return fYield1;
-        else if( fPrice == fPrice2 )
-            return fYield2;
-        else if( fPrice == fPriceN )
-            return fYieldN;
-        else if( fPrice < fPrice2 )
-        {
-            fYield2 *= 2.0;
-            fPrice2 = GetOddfprice( nNullDate, nSettle, nMat, nIssue, nFirstCoup, fRate, fYield2, fRedemp, nFreq, nBase );
-
-            fYieldN = ( fYield2 - fYield1 ) * 0.5;
-        }
-        else
-        {
-            if( fPrice < fPriceN )
-            {
-                fYield1 = fYieldN;
-                fPrice1 = fPriceN;
-            }
-            else
-            {
-                fYield2 = fYieldN;
-                fPrice2 = fPriceN;
-            }
-
-            fYieldN = fYield2 - ( fYield2 - fYield1 ) * ( ( fPrice - fPrice2 ) / ( fPrice1 - fPrice2 ) );
-        }
-    }
-
-    if( fabs( fPrice - fPriceN ) > fPrice / 100.0 )
-        THROW_IAE;		// result not precise enough
-
-    return fYieldN;
-*/
 }
 
 
@@ -1283,23 +1165,6 @@ double GetZw( double fZins, double fZzr, double fRmz, double fBw, sal_Int32 nF )
 }
 
 
-/*double TBillYield( constREFXPS& xOpt, sal_Int32 nSettle, sal_Int32 nMat, double fPrice ) THROWDEF_RTE_IAE
-{
-    sal_Int32	nDiff = GetDiffDate360( xOpt, nSettle, nMat, sal_True );
-
-    if( fPrice <= 0.0 || nSettle >= nMat || nDiff > 360 )
-        THROW_IAE;
-
-    double		fRet = 100.0;
-    fRet /= fPrice;
-    fRet--;
-    fRet *= double( nDiff );
-    fRet /= 360.0;
-
-    return fRet;
-}*/
-
-
 //-----------------------------------------------------------------------------
 // financial functions COUP***
 
@@ -1515,7 +1380,6 @@ FuncData::FuncData( const FuncDataBase& r, ResMgr& rResMgr ) :
     eCat( r.eCat )
 {
     AnalysisRscStrArrLoader	aArrLoader( RID_ANALYSIS_DEFFUNCTION_NAMES, nCompID, rResMgr );
-//	ResStringArray		aDefFuncNameArray( AnalysisResId( nCompID, rResMgr ) );
     const ResStringArray&	rArr = aArrLoader.GetStringArray();
 
     sal_uInt16				nCount = sal::static_int_cast<sal_uInt16>( rArr.Count() );
@@ -2252,12 +2116,6 @@ sal_Int16 ConvertData::GetMatchingLevel( const STRING& rRef ) const
                             n = INV_MATCHLEV;
             }
 
-// We could weed some nonsense out, ODFF doesn't say so though.
-#if 0
-            if (n < 0 && Class() == CDC_Information)
-                n = INV_MATCHLEV;   // milli-bits doesn't make sense
-#endif
-
 //! <HACK> #100616# "cm3" is not 10^-2 m^3 but 10^-6 m^3 !!! ------------------
             if( n != INV_MATCHLEV )
             {
@@ -2356,8 +2214,6 @@ double ConvertDataLinear::Convert(
 {
     if( Class() != r.Class() )
         THROW_IAE;
-
-//	return ::rtl::math::round( r.ConvertFromBase( ConvertToBase( f, nLevFrom ), nLevTo ), 13 );
     return r.ConvertFromBase( ConvertToBase( f, nLevFrom ), nLevTo );
 }
 
@@ -2462,14 +2318,12 @@ ConvertDataList::ConvertDataList( void )
     // ENERGY: 1 Joule is...
     NEWDP( "J",     1.0000000000000000E00,  CDC_Energy ); // Joule
     NEWDP( "e",     1.0000000000000000E07,  CDC_Energy ); // Erg  -> http://www.chemie.fu-berlin.de/chemistry/general/si.html
-//  NEWD( "e",      9.99999519343231E06,    CDC_Energy ); // Erg
     NEWDP( "c",     2.3900624947346700E-01, CDC_Energy ); // Thermodynamical Calorie
     NEWDP( "cal",   2.3884619064201700E-01, CDC_Energy ); // Calorie
     NEWDP( "eV",    6.2414570000000000E18,  CDC_Energy ); // Electronvolt
     NEWDP( "ev",    6.2414570000000000E18,  CDC_Energy ); // Electronvolt also
     NEWD( "HPh",    3.7250611111111111E-07, CDC_Energy ); // Horsepower Hours
     NEWD( "hh",     3.7250611111111111E-07, CDC_Energy ); // Horsepower Hours also
-//  NEWD( "HPh",    3.72506430801000E-07,   CDC_Energy ); // Horsepower Hours
     NEWDP( "Wh",    2.7777777777777778E-04, CDC_Energy ); // Watt Hours
     NEWDP( "wh",    2.7777777777777778E-04, CDC_Energy ); // Watt Hours also
     NEWD( "flb",    2.37304222192651E01,    CDC_Energy ); // Foot Pound
@@ -2482,7 +2336,6 @@ ConvertDataList::ConvertDataList( void )
     NEWD( "HP",     1.341022E-03,           CDC_Power ); // Horsepower
     NEWD( "h",      1.341022E-03,           CDC_Power ); // Horsepower also
     NEWD( "PS",     1.359622E-03,           CDC_Power ); // *** German Pferdestaerke
-//  NEWD( "HP",     1.4102006031908E-03,    CDC_Power ); // Excel seams to be a little bit wrong... either this doesn't fit to J -> HPh
 
     // MAGNETISM: 1 Tesla is...
     NEWDP( "T",     1.0000000000000000E00,  CDC_Magnetism ); // Tesla
@@ -2580,10 +2433,6 @@ ConvertDataList::~ConvertDataList()
 
 double ConvertDataList::Convert( double fVal, const STRING& rFrom, const STRING& rTo ) THROWDEF_RTE_IAE
 {
-// This will not catch illegal units
-//   if( rFrom == rTo )
-//       return fVal;
-
     ConvertData*	pFrom = NULL;
     ConvertData*	pTo = NULL;
     sal_Bool		bSearchFrom = sal_True;
diff --git a/scaddins/source/analysis/analysishelper.hxx b/scaddins/source/analysis/analysishelper.hxx
index 6ecb9eb..139f3d8 100644
--- a/scaddins/source/analysis/analysishelper.hxx
+++ b/scaddins/source/analysis/analysishelper.hxx
@@ -53,12 +53,10 @@ class ScaAnyConverter;
 
 #define	PI			3.1415926535897932
 #define PI_2		(PI/2.0)
-//#define	EULER		2.7182818284590452
 #define	EOL			( ( const sal_Char* ) 1 )
 #define	EOE			( ( const sal_Char* ) 2 )
 
 
-//double				_Test( sal_Int32 nMode, double f1, double f2, double f3 );
 inline sal_Bool     IsLeapYear( sal_uInt16 nYear );
 sal_uInt16			DaysInMonth( sal_uInt16 nMonth, sal_uInt16 nYear );
 sal_Int32			DateToDays( sal_uInt16 nDay, sal_uInt16 nMonth, sal_uInt16 nYear );
@@ -125,7 +123,6 @@ double				GetOddlyield( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat,
                                 double fRate, double fPrice, double fRedemp, sal_Int32 nFreq, sal_Int32 nBase ) THROWDEF_RTE_IAE;
 double				GetRmz( double fZins, double fZzr, double fBw, double fZw, sal_Int32 nF );
 double				GetZw( double fZins, double fZzr, double fRmz, double fBw, sal_Int32 nF );
-//double				TBillYield( constREFXPS& xOpt, sal_Int32 nSettle, sal_Int32 nMat, double fPrice )THROWDEF_RTE_IAE;
 
 double				GetCouppcd( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nFreq,
                                 sal_Int32 nBase ) THROWDEF_RTE_IAE;
-- 
1.7.1


--------------070903000307090300090306
Content-Type: text/x-patch;
 name="0002-remove-dead-code-in-calc-sc-inc.patch"
Content-Transfer-Encoding: 7bit
Content-Disposition: attachment;
 filename="0002-remove-dead-code-in-calc-sc-inc.patch"



More information about the LibreOffice mailing list