Changeset 122


Ignore:
Timestamp:
Jul 21, 2010 12:40:21 PM (10 years ago)
Author:
awalther
Message:

merge stable version with revision 121

Location:
stable/2.1
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • stable/2.1

  • stable/2.1/ADOL-C/src/sparse/sparsedrivers.cpp

    r116 r122  
    977977    free(JP);
    978978
     979#ifdef HAVE_LIBCOLPACK
    979980    // yields segmentation fault, check again !!
    980981    // if (g)
     
    983984    if (jr1d)
    984985        delete (JacobianRecovery1D*)jr1d;
    985 
    986 }
    987 
     986#endif
     987}
    988988/*****************************************************************************/
    989989/*                                                 FREE SPARSE HESSIAN INFOS */
     
    10161016    free(HP);
    10171017
     1018#ifdef HAVE_LIBCOLPACK
    10181019    // yields segmentation fault, check again !!
    10191020    // // if (g)
     
    10221023    if (hr)
    10231024        delete (HessianRecovery*) hr;
    1024 
     1025#endif
    10251026}
    10261027
  • stable/2.1/ADOL-C/src/tape_handling.cpp

    r116 r122  
    2727using namespace std;
    2828
     29#ifdef SPARSE
    2930BEGIN_C_DECLS
    3031ADOLC_DLL_EXPORT void freeSparseJacInfos(double *y, double **Seed, double **B, unsigned int **JP,
     
    3435                                          void *g, void *hr, int p, int indep);
    3536END_C_DECLS
    36 
     37#endif
    3738/* vector of tape infos for all tapes in use */
    3839vector<TapeInfos *> ADOLC_TAPE_INFOS_BUFFER_DECL;
     
    342343            if ((*tiIter)->tapeID==tapeID) {
    343344                tapeInfos=*tiIter;
     345#ifdef SPARSE
    344346                // free memory of tape entry that had been used previously
    345347                freeSparseJacInfos(tapeInfos->pTapeInfos.sJinfos.y,
     
    352354                        tapeInfos->pTapeInfos.sJinfos.seed_clms,
    353355                        tapeInfos->pTapeInfos.sJinfos.depen);
     356#endif
    354357
    355358                tapeInfos->pTapeInfos.sJinfos.y=sJinfos.y;
     
    383386            if ((*tiIter)->tapeID==tapeID) {
    384387                tapeInfos=*tiIter;
    385 
     388#ifdef SPARSE
    386389                // free memory of tape entry that had been used previously
    387390                    freeSparseHessInfos(tapeInfos->pTapeInfos.sHinfos.Hcomp,
     
    395398                                        tapeInfos->pTapeInfos.sHinfos.p,
    396399                                        tapeInfos->pTapeInfos.sHinfos.indep);   
     400#endif
    397401                    tapeInfos->pTapeInfos.sHinfos.Hcomp=sHinfos.Hcomp;
    398402                    tapeInfos->pTapeInfos.sHinfos.Xppp=sHinfos.Xppp;
Note: See TracChangeset for help on using the changeset viewer.