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

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

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

revision 393 by johnpye, Sun Mar 19 23:01:39 2006 UTC revision 394 by wangym, Thu Mar 30 14:50:35 2006 UTC
# Line 33  Line 33 
33      An explicit definition of STATIC_PACKAGES or DYNAMIC_PACKAGES is also      An explicit definition of STATIC_PACKAGES or DYNAMIC_PACKAGES is also
34      required.      required.
35  */  */
   
36  #ifndef DYNAMIC_PACKAGES  #ifndef DYNAMIC_PACKAGES
37  # error "WHERE IS THE DYNAMICS PACKAGES #DEF?!"  # error "WHERE IS THE DYNAMICS PACKAGES #DEF?!"
38  #endif  #endif
# Line 216  int LoadArchiveLibrary(CONST char *name, Line 215  int LoadArchiveLibrary(CONST char *name,
215  #elif defined(DYNAMIC_PACKAGES)  #elif defined(DYNAMIC_PACKAGES)
216    
217    symchar *name_with_extn;    symchar *name_with_extn;
   name_with_extn = MakeArchiveLibraryName(name);  
218    
219    int result;    int result;
220    char *default_path = ".";    char *default_path = ".";
# Line 226  int LoadArchiveLibrary(CONST char *name, Line 224  int LoadArchiveLibrary(CONST char *name,
224    
225    char initfunc_generated_name[255];    char initfunc_generated_name[255];
226    
227      name_with_extn = MakeArchiveLibraryName(name);
228    
229    full_file_name = SearchArchiveLibraryPath(name_with_extn,default_path,env);    full_file_name = SearchArchiveLibraryPath(name_with_extn,default_path,env);
230    if (!full_file_name) {    if (!full_file_name) {
231      ERROR_REPORTER_NOLINE(ASC_USER_ERROR,"The named library '%s' was not found in the search path",name_with_extn);      ERROR_REPORTER_NOLINE(ASC_USER_ERROR,"The named library '%s' was not found in the search path",name_with_extn);

Legend:
Removed from v.393  
changed lines
  Added in v.394

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22