paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-01 13:50:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed ar commands

Browse Source
This commit is contained in:
peter 1999-11-03 23:43:45 +00:00
parent d1e68e7136
commit 8e27e760ce
1 changed files with 9 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
compiler/systems.pas
View File

@ -171,7 +171,6 @@ unit systems;
tarinfo = packed record
id : tar;
arbin : string[8];
arcmd : string[50];
end;
@ -803,34 +802,29 @@ implementation
{$ifdef i386}
,(
id : ar_i386_ar;
arbin : 'ar';
arcmd : 'rs $LIB $FILES'
arcmd : 'ar rs $LIB $FILES'
),
(
id : ar_i386_arw;
arbin : 'arw';
arcmd : 'rs $LIB $FILES'
arcmd : 'arw rs $LIB $FILES'
)
{$endif i386}
{$ifdef m68k}
,(
id : ar_m68k_ar;
arbin : 'ar';
arcmd : 'rs $LIB $FILES'
arcmd : 'ar rs $LIB $FILES'
)
{$endif m68k}
{$ifdef alpha}
,(
id : ar_alpha_ar;
arbin : 'ar';
arcmd : 'rs $LIB $FILES'
arcmd : 'ar rs $LIB $FILES'
)
{$endif}
{$ifdef powerpc}
,(
id : ar_powerpc_ar;
arbin : 'ar';
arcmd : 'rs $LIB $FILES'
arcmd : 'ar rs $LIB $FILES'
)
{$endif}
);
@ -1515,7 +1509,10 @@ begin
end.
{
$Log$
Revision 1.95 1999-10-21 14:29:37 peter
Revision 1.96 1999-11-03 23:43:45 peter
* fixed ar commands
Revision 1.95 1999/10/21 14:29:37 peter
* redesigned linker object
+ library support for linux (only procedures can be exported)