SmartAslDestr.cpp
Go to the documentation of this file.
1 // $Id: SmartAslDestr.cpp 488 2011-01-10 17:06:41Z pbelotti $
2 //
3 // (C) Copyright International Business Machines Corporation 2007
4 // All Rights Reserved.
5 // This code is published under the Eclipse Public License (EPL).
6 //
7 // Authors :
8 // Pierre Bonami, International Business Machines Corporation
9 // Pietro Belotti, Lehigh University
10 //
11 // Date : 05/31/2010
12 
13 // Ampl includes
14 
15 #include "BonCouenneSetup.hpp"
16 
17 #ifdef COIN_HAS_ASL
18 #include "asl.h"
19 #include "getstub.h"
20 #endif
21 
22 using namespace Couenne;
23 
25 #ifdef COIN_HAS_ASL
26  //Code from Ipopt::AmplTNLP to free asl
27  if(asl != NULL){
28  if (X0) {
29  delete [] X0;
30  X0 = NULL;
31  }
32  if (havex0) {
33  delete [] havex0;
34  havex0 = NULL;
35  }
36  if (pi0) {
37  delete [] pi0;
38  pi0 = NULL;
39  }
40  if (havepi0) {
41  delete [] havepi0;
42  havepi0 = NULL;
43  }
44  ASL* asl_to_free = (ASL*)asl;
45  ASL_free(&asl_to_free);
46  asl = NULL;
47  }
48  ASL_free(&asl);
49 #endif
50 }
51