JWS-112 Bumping version of Mafft to version 7.310.

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

diff --git a/binaries/src/mafft/core/dndfast7.c b/binaries/src/mafft/core/dndfast7.c
index fb758b2..e83e0c2 100644 (file)
--- a/binaries/src/mafft/core/dndfast7.c
+++ b/binaries/src/mafft/core/dndfast7.c
@@ -76,13 +76,13 @@ int main( int argc, char *argv[] )
        FILE *infp;
        char **seq = NULL; // by D.Mathog
        char **seq1;
-       static char name[M][B];
-       static char name1[M][B];
+       char **name;
+       char **name1;
        static int nlen1[M];
        double **mtx;
        double **mtx2;
        static int nlen[M];
-       char b[B];
+       static char b[B];
        double max;
        char com[1000];
        int opt[M];
@@ -151,6 +151,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 );
@@ -173,7 +175,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 );
 
@@ -304,7 +306,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 );
 
 #if 1