X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2Fcompinfo.c;h=c7eecbe50d119564bc5e1f1c1a460dfb51e153e7;hb=8e848ca63c0f76bb0040ca461701364d5acae0d3;hp=33cf08c55d96cf4487d634c227be8c8d65ce241b;hpb=a9b59dc535e11b9a323e0b55c0bc1d3075f36d83;p=unres.git diff --git a/source/unres/src_MD/compinfo.c b/source/unres/src_MD/compinfo.c index 33cf08c..c7eecbe 100644 --- a/source/unres/src_MD/compinfo.c +++ b/source/unres/src_MD/compinfo.c @@ -14,10 +14,10 @@ time_t Tp; in=fopen("cinfo.f","r"); out=fopen("cinfo.f.new","w"); -(void)fgets(buf,498,in); -fprintf(out,"C DO NOT EDIT THIS FILE - IT HAS BEEN GENERATED BY COMPINFO.C\n"); -(void)fgets(buf,498,in); -sscanf(&buf[1],"%d %d %d",&iv1,&iv2,&iv3); +if (fgets(buf,498,in) != NULL) + fprintf(out,"C DO NOT EDIT THIS FILE - IT HAS BEEN GENERATED BY COMPINFO.C\n"); +if (fgets(buf,498,in) != NULL) + sscanf(&buf[1],"%d %d %d",&iv1,&iv2,&iv3); iv3++; fprintf(out,"C %d %d %d\n",iv1,iv2,iv3); fprintf(out," subroutine cinfo\n"); @@ -28,9 +28,8 @@ uname(&Name); time(&Tp); system("whoami > tmptmp"); in1=fopen("tmptmp","r"); -(void)fscanf(in1,"%s",buf1); -fclose(in1); -system("rm tmptmp"); +if (fscanf(in1,"%s",buf1) != NULL) +{ 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); - (void)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';