[Seqinr-commits] r1727 - pkg/src

[noreply at r-forge.r-project.org]

Author: lobry
Date: 2010-03-06 10:53:57 +0100 (Sat, 06 Mar 2010)
New Revision: 1727

Modified:
   pkg/src/alignment.c
Log:
memory leak problem fix in read_fasta_align

Modified: pkg/src/alignment.c
===================================================================
--- pkg/src/alignment.c	2010-03-06 09:52:44 UTC (rev 1726)
+++ pkg/src/alignment.c	2010-03-06 09:53:57 UTC (rev 1727)
@@ -723,7 +723,7 @@
     }
     seq[totseqs][lseq] = '\0';
     SET_ELEMENT(listseq, totseqs, mkChar(seq[totseqs]));
-   }
+  }
 
   SET_ELEMENT(list, 0, nombreseq);
   SET_ELEMENT(list, 1, listname);