=================================================================== RCS file: /home/cvs/OpenXM/src/ox_gsl/ox_gsl.c,v retrieving revision 1.16 retrieving revision 1.18 diff -u -p -r1.16 -r1.18 --- OpenXM/src/ox_gsl/ox_gsl.c 2019/10/21 05:37:20 1.16 +++ OpenXM/src/ox_gsl/ox_gsl.c 2021/03/10 06:51:57 1.18 @@ -1,4 +1,4 @@ -/* $OpenXM: OpenXM/src/ox_gsl/ox_gsl.c,v 1.15 2018/06/08 00:03:43 takayama Exp $ +/* $OpenXM: OpenXM/src/ox_gsl/ox_gsl.c,v 1.17 2019/10/23 07:00:43 takayama Exp $ */ #include @@ -405,6 +405,8 @@ int sm_executeFunction() call_gsl_odeiv_step("rk4"); }else if (strcmp(func->s,"gsl_sf_gamma_inc")==0) { call_gsl_sf_gamma_inc(); + }else if (strcmp(func->s,"gsl_eigen_nonsymmv")==0) { + call_gsl_eigen_nonsymmv(); }else { push(make_error2("sm_executeFunction, unknown function",NULL,0,-1)); return -1; @@ -487,7 +489,7 @@ void push_error_from_file() { FILE *fp; #define BUF_SIZE 1024 char logname[BUF_SIZE]; - char cmd[BUF_SIZE]; + char cmd[BUF_SIZE+100]; char file[BUF_SIZE]; char reason[BUF_SIZE]; int gsl_errno, line;