X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Fcompinfo.c;h=e28f6864eb2d60a4cbde6be922e7c79d655400a6;hb=14b55af23c7da34bfdc10f315551c8e01a3a906a;hp=d20b2c9047a69497f96ef0b80130a7f52ef78547;hpb=278ef5360168c7eedc47b233648d4d12c4bd473c;p=unres.git diff --git a/source/unres/src_MD-M/compinfo.c b/source/unres/src_MD-M/compinfo.c index d20b2c9..e28f686 100644 --- a/source/unres/src_MD-M/compinfo.c +++ b/source/unres/src_MD-M/compinfo.c @@ -28,9 +28,8 @@ uname(&Name); time(&Tp); system("whoami > tmptmp"); in1=fopen("tmptmp","r"); -fscanf(in1,"%s",buf1); -fclose(in1); -system("rm tmptmp"); +if (fscanf(in1,"%s",buf1) != EOF) +{ p1=ctime(&Tp); p1[strlen(p1)-1]='\0'; fprintf(out," write(iout,*)'compiled %s'\n",p1); @@ -40,6 +39,9 @@ fprintf(out," write(iout,*)'OS release: %s '\n",Name.release); fprintf(out," write(iout,*)'OS version:',\n"); fprintf(out," & ' %s '\n",Name.version); fprintf(out," write(iout,*)'flags:'\n"); +} +system("rm tmptmp"); +fclose(in1); in1=fopen("Makefile","r"); while(fgets(buf,498,in1) != NULL) { @@ -57,8 +59,8 @@ while(fgets(buf,498,in1) != NULL) { strcat(buf,"\\"); fprintf(out," write(iout,*)'%s'\n",buf); - fgets(buf,498,in1); - buf[strlen(buf)-1]='\0'; + if (fgets(buf,498,in1) != NULL) + buf[strlen(buf)-1]='\0'; if(strlen(buf) > 49) { buf[47]='\0';