paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-19 01:39:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

* small updates to make playing with sparc/sunos easier

Browse Source
This commit is contained in:
marco 2004-10-01 17:41:21 +00:00
parent 75cd5c80fa
commit ef6c8dc443
2 changed files with 81 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

73
compiler/systems/i_sunos.pas
View File

@ -91,6 +91,68 @@ unit i_sunos;
use_function_relative_addresses : true
);
system_sparc_sunos_info : tsysteminfo =
(
system : system_sparc_sunos;
name : 'SunOS for SPARC';
shortname : 'SunOS';
flags : [tf_needs_symbol_size];
cpu : cpu_SPARC;
unit_env : 'SUNOSUNITS';
extradefines : 'UNIX;HASUNIX';
sourceext : '.pp';
pasext : '.pas';
exeext : '';
defext : '.def';
scriptext : '.sh';
smartext : '.sl';
unitext : '.ppu';
unitlibext : '.ppl';
asmext : '.s';
objext : '.o';
resext : '.res';
resobjext : '.or';
sharedlibext : '.so';
staticlibext : '.a';
staticlibprefix : 'libp';
sharedlibprefix : 'lib';
sharedClibext : '.so';
staticClibext : '.a';
staticClibprefix : 'lib';
sharedClibprefix : 'lib';
Cprefix : '';
newline : #10;
dirsep : '/';
files_case_relevent : true;
assem : as_gas;
assemextern : as_gas;
link : nil;
linkextern : nil;
ar : ar_gnu_ar;
res : res_none;
script : script_unix;
endian : endian_big;
alignment :
(
procalign : 4;
loopalign : 4;
jumpalign : 0;
constalignmin : 0;
constalignmax : 8;
varalignmin : 0;
varalignmax : 8;
localalignmin : 4;
localalignmax : 8;
recordalignmin : 0;
recordalignmax : 8;
maxCrecordalign : 8
);
first_parm_offset : 92;
heapsize : 256*1024;
stacksize : 262144;
DllScanSupported:false;
use_function_relative_addresses : true
);
implementation
@ -100,10 +162,19 @@ initialization
set_source_info(system_i386_sunos_info);
{$endif sunos}
{$endif CPU86}
{$ifdef CPUSparc}
{$ifdef sunos}
set_source_info(system_sparc_sunos_info);
{$endif sunos}
{$endif CPUSparc}
end.
{
$Log$
Revision 1.3 2004-06-20 08:55:32 florian
Revision 1.4 2004-10-01 17:41:21 marco
* small updates to make playing with sparc/sunos easier
Revision 1.3 2004/06/20 08:55:32 florian
* logs truncated
}

10
compiler/systems/t_sunos.pas
View File

@ -486,10 +486,18 @@ initialization
RegisterImport(system_i386_sunos,TImportLibSunos);
RegisterExport(system_i386_sunos,TExportLibSunos);
RegisterTarget(system_i386_sunos_info);
RegisterExternalLinker(system_sparc_sunos_info,TLinkerSunos);
RegisterImport(system_sparc_sunos,TImportLibSunos);
RegisterExport(system_sparc_sunos,TExportLibSunos);
RegisterTarget(system_sparc_sunos_info);
end.
{
$Log$
Revision 1.10 2004-09-22 15:25:14 mazen
Revision 1.11 2004-10-01 17:41:21 marco
* small updates to make playing with sparc/sunos easier
Revision 1.10 2004/09/22 15:25:14 mazen
* Fix error committing : previous version must be in branch USE_SYSUTILS
Revision 1.8 2004/06/20 08:55:32 florian