JWS-112 Bumping version of Mafft to version 7.310.

[jabaws.git] / binaries / src / mafft / core / dndblast.c

diff --git a/binaries/src/mafft/core/dndblast.c b/binaries/src/mafft/core/dndblast.c
index 7fd1aed..4406b55 100644 (file)
--- a/binaries/src/mafft/core/dndblast.c
+++ b/binaries/src/mafft/core/dndblast.c
@@ -73,8 +73,8 @@ int main( int argc, char *argv[] )
        FILE *hat3p;
        char **seq = NULL; // by D.Mathog
        char **seq1;
-       static char name[M][B];
-       static char name1[M][B];
+       static char **name;
+       static char **name1;
        static int nlen1[M];
        double **mtx;
        double **mtx2;
@@ -141,6 +141,8 @@ int main( int argc, char *argv[] )
 
        rewind( infp );
 
+       name = AllocateCharMtx( njob, B+1 );
+       name1 = AllocateCharMtx( njob, B+1 );
        seq = AllocateCharMtx( njob, nlenmax+1 );
        seq1 = AllocateCharMtx( 2, nlenmax+1 );
        mtx = AllocateDoubleMtx( njob, njob );
@@ -164,7 +166,7 @@ int main( int argc, char *argv[] )
 #if 0
        FRead( infp, name, nlen, seq );
 #else
-       readData( infp, name, nlen, seq );
+       readData_pointer( infp, name, nlen, seq );
 #endif
        fclose( infp );
        
@@ -374,7 +376,7 @@ int main( int argc, char *argv[] )
 
        hat2p = fopen( hat2file, "w" );
        if( !hat2p ) ErrorExit( "Cannot open hat2." );
-       WriteHat2( hat2p, njob, name, mtx2 );
+       WriteHat2_pointer( hat2p, njob, name, mtx2 );
        fclose( hat2p );