/[ascend]/trunk/base/generic/compiler/module.c
ViewVC logotype

Diff of /trunk/base/generic/compiler/module.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 967 by johnpye, Thu Oct 26 10:18:53 2006 UTC revision 968 by johnpye, Mon Dec 18 05:49:00 2006 UTC
# Line 996  int ModuleSearchPath(CONST char *name, Line 996  int ModuleSearchPath(CONST char *name,
996          tmp = Asc_GetEnv(PATHENVIRONMENTVAR);          tmp = Asc_GetEnv(PATHENVIRONMENTVAR);
997          if(tmp==NULL){          if(tmp==NULL){
998              ERROR_REPORTER_HERE(ASC_PROG_ERROR,"No paths to search (is env var '%s' set?)",PATHENVIRONMENTVAR);              ERROR_REPORTER_HERE(ASC_PROG_ERROR,"No paths to search (is env var '%s' set?)",PATHENVIRONMENTVAR);
999                ospath_free(fp1);
1000              return 1;              return 1;
1001          }          }
1002    
# Line 1005  int ModuleSearchPath(CONST char *name, Line 1006  int ModuleSearchPath(CONST char *name,
1006          if(sp1==NULL){          if(sp1==NULL){
1007              ERROR_REPORTER_HERE(ASC_PROG_ERROR,"Unable to process %s value '%s'",PATHENVIRONMENTVAR,tmp);              ERROR_REPORTER_HERE(ASC_PROG_ERROR,"Unable to process %s value '%s'",PATHENVIRONMENTVAR,tmp);
1008              /* memory error */              /* memory error */
1009              ascfree(tmp);              ASC_FREE(tmp);
1010                ospath_free(fp1);
1011              return -3;              return -3;
1012          }          }
1013          ascfree(tmp);          ascfree(tmp);
Legend:
Removed from v.967  
changed lines
  Added in v.968
john.pye@anu.edu.au
 ViewVC Help
Powered by ViewVC 1.1.22