* fixed a minor issue in printing indel VCF
kputc(ref[pos], &s);
for (i = 1; i < 4; ++i) {
if (bc->a[i] < 0) break;
- if (i > 1) kputc(',', &s);
+ if (i > 1) {
+ kputc(',', &s); kputc(ref[pos], &s);
+ }
if (bca->indel_types[bc->a[i]] < 0) { // deletion
for (j = -bca->indel_types[bc->a[i]]; j < bca->indelreg; ++j)
kputc(ref[pos+1+j], &s);
#endif
#ifndef PACKAGE_VERSION
-#define PACKAGE_VERSION "0.1.9-3 (r797)"
+#define PACKAGE_VERSION "0.1.9-4 (r801)"
#endif
int bam_taf2baf(int argc, char *argv[]);