Changeset aa22f5 in git
- Timestamp:
- May 20, 2005, 4:49:59 PM (19 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- e6a01964d9be4bf183ccc3d4b259d99f1b15e31d
- Parents:
- 6cef452e6d6bdeb7069990f7ca85c401e9aeb63d
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
modules/modgen/creat_top.cc
r6cef452 raa22f5 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: creat_top.cc,v 1.2 1 2003-06-11 21:33:17 krueger Exp $ */4 /* $Id: creat_top.cc,v 1.22 2005-05-20 14:49:59 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT: lib parsing … … 140 140 fprintf(fp, " if(ret==0) { \n"); 141 141 fprintf(fp, " if ((sb.st_mode & S_IFMT) == S_IFREG) { \n"); 142 fprintf(fp, " if (crccheck(tempstr)!=crcsum) ret=-1;\n"); 142 fprintf(fp, " if (crccheck(tempstr)!=crcsum)\n"); 143 fprintf(fp, " { Warn(\"file %%s does not agree with module version - ignoring file\",tempstr);\n"); 144 fprintf(fp, " ret=-1;\n }\n"); 143 145 fprintf(fp, " if ((binfp = fopen(tempstr,\"r\")) == NULL) return -1;\n"); 144 146 fprintf(fp, " } \n else \n ret=-1; \n }\n\n"); 145 147 fprintf(fp, " fill_help_package();\n"); 146 148 fprintf(fp, " fill_example_package();\n\n"); 147 fprintf(fp, " if(ret==-1) Warn(\"file %%s does not agree with module version - ignoring file\",tempstr);\n");148 149 } 149 150
Note: See TracChangeset
for help on using the changeset viewer.