Explorar el Código

* Staticlibfilename no longer not include a path. Correction when calling
ar.

daniel hace 27 años
padre
commit
5d506871af
Se han modificado 1 ficheros con 6 adiciones y 2 borrados
  1. 6 2
      compiler/link.pas

+ 6 - 2
compiler/link.pas

@@ -462,7 +462,7 @@ begin
      aktglobalswitches:=aktglobalswitches+[cs_link_extern];
      aktglobalswitches:=aktglobalswitches+[cs_link_extern];
    end;
    end;
   s:=target_ar.arcmd;
   s:=target_ar.arcmd;
-  Replace(s,'$LIB',current_module^.staticlibfilename^);
+  Replace(s,'$LIB',current_module^.path+current_module^.staticlibfilename^);
   if filescnt=0 then
   if filescnt=0 then
    Replace(s,'$FILES',current_module^.objfilename^)
    Replace(s,'$FILES',current_module^.objfilename^)
   else
   else
@@ -499,7 +499,11 @@ end;
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.30  1998-10-13 13:10:18  peter
+  Revision 1.31  1998-10-14 11:01:21  daniel
+  * Staticlibfilename no longer not include a path. Correction when calling
+  ar.
+
+  Revision 1.30  1998/10/13 13:10:18  peter
     * new style for m68k/i386 infos and enums
     * new style for m68k/i386 infos and enums
 
 
   Revision 1.29  1998/10/13 08:19:34  pierre
   Revision 1.29  1998/10/13 08:19:34  pierre