/[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 861 by johnpye, Sun Sep 10 06:18:24 2006 UTC revision 862 by johnpye, Tue Sep 26 13:47:27 2006 UTC
# Line 129  int LoadArchiveLibrary(CONST char *parti Line 129  int LoadArchiveLibrary(CONST char *parti
129      struct FilePath *fp1;      struct FilePath *fp1;
130      int result;      int result;
131    
132        /**
133            @TODO
134                * modify SearchArchiveLibraryPath to use the ImportHandler array
135                  in each directory in the path.
136                * when a file is found, return information about which ImportHandler
137                  should be used to open it, then make the call.
138        */
139    
140      CONSOLE_DEBUG("Searching for external library '%s'",partialname);      CONSOLE_DEBUG("Searching for external library '%s'",partialname);
141    
142      file = SearchArchiveLibraryPath(partialname, ASC_DEFAULTPATH, PATHENVIRONMENTVAR);      file = SearchArchiveLibraryPath(partialname, ASC_DEFAULTPATH, PATHENVIRONMENTVAR);
143      if(file==NULL){      if(file==NULL){
144            ERROR_REPORTER_HERE(ASC_PROG_WARNING,"'ImportHandler' functionality not yet implemeneted.");
145          ERROR_REPORTER_NOLINE(ASC_USER_ERROR,"External library '%s' not found.",partialname);          ERROR_REPORTER_NOLINE(ASC_USER_ERROR,"External library '%s' not found.",partialname);
146          return 1;          return 1;
147      }else{      }else{
148          /* file was found, and is DLL/SO */          /* file was found, and is DLL/SO */
149      }      }
150    
151        /* assume that the complete path is now in 'file' */
152      fp1 = ospath_new_from_posix(partialname);      fp1 = ospath_new_from_posix(partialname);
153      stem = ospath_getfilestem(fp1);      stem = ospath_getfilestem(fp1);
154      if(stem==NULL){      if(stem==NULL){

Legend:
Removed from v.861  
changed lines
  Added in v.862

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