paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 17:29:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ added new ar - sdcc-sdar

Browse Source 
git-svn-id: branches/z80@45072 -
This commit is contained in:
nickysn 2020-04-25 15:28:35 +00:00
parent 3580c53b05
commit 8bd38e0e29
4 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/link.pas
View File

@ -1742,6 +1742,14 @@ Implementation
arfinishcmd : '' arfinishcmd : ''
); );
ar_sdcc_sdar_info : tarinfo =
( id : ar_sdcc_sdar;
addfilecmd : '';
arfirstcmd : '';
arcmd : 'sdar qS $LIB $FILES';
arfinishcmd : 'sdar s $LIB'
);
initialization initialization
RegisterAr(ar_gnu_ar_info); RegisterAr(ar_gnu_ar_info);
@ -1749,4 +1757,5 @@ initialization
RegisterAr(ar_gnu_gar_info); RegisterAr(ar_gnu_gar_info);
RegisterAr(ar_watcom_wlib_omf_info); RegisterAr(ar_watcom_wlib_omf_info);
RegisterAr(ar_watcom_wlib_omf_scripted_info); RegisterAr(ar_watcom_wlib_omf_scripted_info);
RegisterAr(ar_sdcc_sdar_info);
end. end.

1
compiler/systems.inc
View File

@ -307,6 +307,7 @@
,ar_gnu_gar ,ar_gnu_gar
,ar_watcom_wlib_omf ,ar_watcom_wlib_omf
,ar_watcom_wlib_omf_scripted ,ar_watcom_wlib_omf_scripted
,ar_sdcc_sdar
); );
tres = (res_none tres = (res_none

2
compiler/systems.pas
View File

@ -101,7 +101,7 @@ interface
addfilecmd : string[10]; addfilecmd : string[10];
arfirstcmd : string[50]; arfirstcmd : string[50];
arcmd : string[50]; arcmd : string[50];
arfinishcmd : string[10]; arfinishcmd : string[11];
end; end;
presinfo = ^tresinfo; presinfo = ^tresinfo;

2
compiler/systems/i_zxspectrum.pas
View File

@ -65,7 +65,7 @@ unit i_zxspectrum;
assemextern : as_sdcc_sdasz80; assemextern : as_sdcc_sdasz80;
link : ld_none; link : ld_none;
linkextern : ld_zxspectrum; linkextern : ld_zxspectrum;
ar : ar_gnu_ar; ar : ar_sdcc_sdar;
res : res_none; res : res_none;
dbg : dbg_dwarf2; dbg : dbg_dwarf2;
script : script_unix; script : script_unix;