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

+ operating system sets added

Browse Source 
git-svn-id: trunk@851 -
This commit is contained in:
florian 2005-08-13 16:47:47 +00:00
parent 84fe2c604d
commit 6f79120a77
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/systems.pas
View File

@ -301,6 +301,11 @@ interface
{ alias for supported_target field in tasminfo } { alias for supported_target field in tasminfo }
system_any = system_none; system_any = system_none;
system_wince : set of tsystem = [system_arm_wince,system_i386_wince];
system_linux : set of tsystem = [system_i386_linux,system_x86_64_linux,system_powerpc_linux,
system_arm_linux,system_sparc_linux,system_alpha_linux,system_m68k_linux,
system_x86_6432_linux];
cpu2str : array[TSystemCpu] of string = cpu2str : array[TSystemCpu] of string =
('','i386','m68k','alpha','powerpc','sparc','vm','ia64','x86_64', ('','i386','m68k','alpha','powerpc','sparc','vm','ia64','x86_64',
'mips','arm'); 'mips','arm');