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

+ jvm/java support

Browse Source 
git-svn-id: branches/jvmbackend@19822 -
This commit is contained in:
Jonas Maebe 2011-12-11 17:25:24 +00:00
parent 21e6401921
commit 1950fb1fa8
1 changed files with 34 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

66
packages/fpmkunit/src/fpmkunit.pp
View File

@ -60,7 +60,7 @@ Type
// Please keep this order, see OSCPUSupported below
TCpu=(cpuNone,
i386,m68k,powerpc,sparc,x86_64,arm,powerpc64,avr,armeb
i386,m68k,powerpc,sparc,x86_64,arm,powerpc64,avr,armeb,jvm
);
TCPUS = Set of TCPU;
@ -69,7 +69,7 @@ Type
linux,go32v2,win32,os2,freebsd,beos,netbsd,
amiga,atari, solaris, qnx, netware, openbsd,wdosx,
palmos,macos,darwin,emx,watcom,morphos,netwlibc,
win64,wince,gba,nds,embedded,symbian,haiku,iphonesim
win64,wince,gba,nds,embedded,symbian,haiku,iphonesim,java
);
TOSes = Set of TOS;
@ -125,36 +125,38 @@ Const
{ This table is kept OS,Cpu because it is easier to maintain (PFV) }
OSCPUSupported : array[TOS,TCpu] of boolean = (
{ os none i386 m68k ppc sparc x86_64 arm ppc64 avr armeb}
{ none } ( false, false, false, false, false, false, false, false, false, false),
{ linux } ( false, true, true, true, true, true, true, true, false, true ),
{ go32v2 } ( false, true, false, false, false, false, false, false, false, false),
{ win32 } ( false, true, false, false, false, false, false, false, false, false),
{ os2 } ( false, true, false, false, false, false, false, false, false, false),
{ freebsd } ( false, true, true, false, false, true, false, false, false, false),
{ beos } ( false, true, false, false, false, false, false, false, false, false),
{ netbsd } ( false, true, true, true, true, false, false, false, false, false),
{ amiga } ( false, false, true, true, false, false, false, false, false, false),
{ atari } ( false, false, true, false, false, false, false, false, false, false),
{ solaris } ( false, true, false, false, true, false, false, false, false, false),
{ qnx } ( false, true, false, false, false, false, false, false, false, false),
{ netware } ( false, true, false, false, false, false, false, false, false, false),
{ openbsd } ( false, true, true, false, false, false, false, false, false, false),
{ wdosx } ( false, true, false, false, false, false, false, false, false, false),
{ palmos } ( false, false, true, false, false, false, true, false, false, false),
{ macos } ( false, false, false, true, false, false, false, false, false, false),
{ darwin } ( false, true, false, true, false, true, true, true, false, false),
{ emx } ( false, true, false, false, false, false, false, false, false, false),
{ watcom } ( false, true, false, false, false ,false, false, false, false, false),
{ morphos } ( false, false, false, true, false ,false, false, false, false, false),
{ netwlibc }( false, true, false, false, false, false, false, false, false, false),
{ win64 } ( false, false, false, false, false, true, false, false, false, false),
{ wince }( false, true, false, false, false, false, true, false, false, false),
{ gba } ( false, false, false, false, false, false, true, false, false, false),
{ nds } ( false, false, false, false, false, false, true, false, false, false),
{ embedded }( false, true, true, true, true, true, true, true, true, true ),
{ symbian } ( false, true, false, false, false, false, true, false, false, false),
{ haiku } ( false, true, false, false, false, false, false, false, false, false),
{ iphonesim}( false, true, false, false, false, false, false, false, false, false)
{ none } ( false, false, false, false, false, false, false, false, false, false, false),
{ linux } ( false, true, true, true, true, true, true, true, false, true , false),
{ go32v2 } ( false, true, false, false, false, false, false, false, false, false, false),
{ win32 } ( false, true, false, false, false, false, false, false, false, false, false),
{ os2 } ( false, true, false, false, false, false, false, false, false, false, false),
{ freebsd } ( false, true, true, false, false, true, false, false, false, false, false),
{ beos } ( false, true, false, false, false, false, false, false, false, false, false),
{ netbsd } ( false, true, true, true, true, false, false, false, false, false, false),
{ amiga } ( false, false, true, true, false, false, false, false, false, false, false),
{ atari } ( false, false, true, false, false, false, false, false, false, false, false),
{ solaris } ( false, true, false, false, true, false, false, false, false, false, false),
{ qnx } ( false, true, false, false, false, false, false, false, false, false, false),
{ netware } ( false, true, false, false, false, false, false, false, false, false, false),
{ openbsd } ( false, true, true, false, false, false, false, false, false, false, false),
{ wdosx } ( false, true, false, false, false, false, false, false, false, false, false),
{ palmos } ( false, false, true, false, false, false, true, false, false, false, false),
{ macos } ( false, false, false, true, false, false, false, false, false, false, false),
{ darwin } ( false, true, false, true, false, true, true, true, false, false, false),
{ emx } ( false, true, false, false, false, false, false, false, false, false, false),
{ watcom } ( false, true, false, false, false ,false, false, false, false, false, false),
{ morphos } ( false, false, false, true, false ,false, false, false, false, false, false),
{ netwlibc }( false, true, false, false, false, false, false, false, false, false, false),
{ win64 } ( false, false, false, false, false, true, false, false, false, false, false),
{ wince }( false, true, false, false, false, false, true, false, false, false, false),
{ gba } ( false, false, false, false, false, false, true, false, false, false, false),
{ nds } ( false, false, false, false, false, false, true, false, false, false, false),
{ embedded }( false, true, true, true, true, true, true, true, true, true , false),
{ symbian } ( false, true, false, false, false, false, true, false, false, false, false),
{ haiku } ( false, true, false, false, false, false, false, false, false, false, false),
{ iphonesim}( false, true, false, false, false, false, false, false, false, false, false),
{ java } ( false, false, false, false, false, false, false, false, false, false, true )
);
// Useful