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

* added support for powerpc64 target

Browse Source 
git-svn-id: trunk@1256 -
This commit is contained in:
tom_at_work 2005-10-02 14:36:28 +00:00
parent 89297d2c39
commit 79ea4bb52f
1 changed files with 27 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

54
utils/fpcm/fpcmmain.pp
View File

@ -63,7 +63,7 @@ interface
type type
TCpu=( TCpu=(
c_i386,c_m68k,c_powerpc,c_sparc,c_x86_64,c_arm c_i386,c_m68k,c_powerpc,c_sparc,c_x86_64,c_arm,c_powerpc64
); );
TOS=( TOS=(
@ -77,11 +77,11 @@ interface
const const
CpuStr : array[TCpu] of string=( CpuStr : array[TCpu] of string=(
'i386','m68k','powerpc','sparc','x86_64','arm' 'i386','m68k','powerpc','sparc','x86_64','arm','powerpc64'
); );
CpuSuffix : array[TCpu] of string=( CpuSuffix : array[TCpu] of string=(
'_i386','_m68k','_powerpc','_sparc','_x86_64','_arm' '_i386','_m68k','_powerpc','_sparc','_x86_64','_arm','_powerpc64'
); );
OSStr : array[TOS] of string=( OSStr : array[TOS] of string=(
@ -100,30 +100,30 @@ interface
{ This table is kept OS,Cpu because it is easier to maintain (PFV) } { This table is kept OS,Cpu because it is easier to maintain (PFV) }
OSCpuPossible : array[TOS,TCpu] of boolean = ( OSCpuPossible : array[TOS,TCpu] of boolean = (
{ os i386 m68k ppc sparc x86_64 arm } { os i386 m68k ppc sparc x86_64 arm ppc64}
{ linux } ( true, true, true, true, true, true), { linux } ( true, true, true, true, true, true, true),
{ go32v2 } ( true, false, false, false, false, false), { go32v2 } ( true, false, false, false, false, false, false),
{ win32 } ( true, false, false, false, false, false), { win32 } ( true, false, false, false, false, false, false),
{ os2 } ( true, false, false, false, false, false), { os2 } ( true, false, false, false, false, false, false),
{ freebsd } ( true, true, false, false, true, false), { freebsd } ( true, true, false, false, true, false, false),
{ beos } ( true, false, false, false, false, false), { beos } ( true, false, false, false, false, false, false),
{ netbsd } ( true, true, true, true, false, false), { netbsd } ( true, true, true, true, false, false, false),
{ amiga } ( false, true, false, false, false, false), { amiga } ( false, true, false, false, false, false, false),
{ atari } ( false, true, false, false, false, false), { atari } ( false, true, false, false, false, false, false),
{ solaris } ( true, false, false, true, false, false), { solaris } ( true, false, false, true, false, false, false),
{ qnx } ( true, false, false, false, false, false), { qnx } ( true, false, false, false, false, false, false),
{ netware } ( true, false, false, false, false, false), { netware } ( true, false, false, false, false, false, false),
{ openbsd } ( true, true, false, false, false, false), { openbsd } ( true, true, false, false, false, false, false),
{ wdosx } ( true, false, false, false, false, false), { wdosx } ( true, false, false, false, false, false, false),
{ palmos } ( false, true, false, false, false, false), { palmos } ( false, true, false, false, false, false, false),
{ macos } ( false, false, true, false, false, false), { macos } ( false, false, true, false, false, false, false),
{ darwin } ( false, false, true, false, false, false), { darwin } ( false, false, true, false, false, false, false),
{ emx } ( true, false, false, false, false, false), { emx } ( true, false, false, false, false, false, false),
{ watcom } ( true, false, false, false ,false, false), { watcom } ( true, false, false, false ,false, false, false),
{ morphos } ( false, false, true, false ,false, false), { morphos } ( false, false, true, false ,false, false, false),
{ netwlibc }( true, false, false, false, false, false), { netwlibc }( true, false, false, false, false, false, false),
{ win64 } ( false, false, false, false, true, false), { win64 } ( false, false, false, false, true, false, false),
{ wince }( true, false, false, false, false, true ) { wince }( true, false, false, false, false, true, false)
); );
type type