Commit c1807a4e authored by Mulas, Giacomo's avatar Mulas, Giacomo
Browse files

free zpv before c4, since it needs c4->lm: now valgrind is clean.

parent 0fe36bcc

src/cluster/cluster.cpp

+6 −6
Original line number Diff line number Diff line
@@ -672,12 +672,6 @@ void cluster(string config_file, string data_file, string output_path) { 
    }

    fclose(output);

    // Clean memory

    delete c1;

    delete c1ao;

    delete c3;

    delete c4;

    delete c6;

    delete c9;

    for (int zi = c4->lm - 1; zi > -1; zi--) {

      for (int zj = 2; zj > -1; zj--) {

	delete[] zpv[zi][zj][1];
@@ -687,6 +681,12 @@ void cluster(string config_file, string data_file, string output_path) { 
      delete[] zpv[zi];

    }

    delete[] zpv;

    delete c1;

    delete c1ao;

    delete c3;

    delete c4;

    delete c6;

    delete c9;

    delete[] am_vector;

    delete[] am;

    //delete[] tam;