|
@@ -77,7 +77,8 @@ interface
|
|
|
o_amiga,o_atari, o_solaris, o_qnx, o_netware, o_openbsd,o_wdosx,
|
|
|
o_palmos,o_macos,o_darwin,o_emx,o_watcom,o_morphos,o_netwlibc,
|
|
|
o_win64,o_wince,o_gba,o_nds,o_embedded,o_symbian,o_nativent,o_iphonesim,
|
|
|
- o_wii,o_aix,o_java,o_android,o_msdos,o_aros,o_dragonfly,o_win16,o_wasm,o_freertos
|
|
|
+ o_wii,o_aix,o_java,o_android,o_msdos,o_aros,o_dragonfly,o_win16,o_wasm,o_freertos,
|
|
|
+ o_zxspectrum
|
|
|
);
|
|
|
|
|
|
TTargetSet=array[tcpu,tos] of boolean;
|
|
@@ -101,7 +102,7 @@ interface
|
|
|
'palmos','macos','darwin','emx','watcom','morphos','netwlibc',
|
|
|
'win64','wince','gba','nds','embedded','symbian','nativent',
|
|
|
'iphonesim', 'wii', 'aix', 'java', 'android', 'msdos', 'aros',
|
|
|
- 'dragonfly', 'win16', 'wasm', 'freertos'
|
|
|
+ 'dragonfly', 'win16', 'wasm', 'freertos', 'zxspectrum'
|
|
|
);
|
|
|
|
|
|
OSSuffix : array[TOS] of string=(
|
|
@@ -110,7 +111,7 @@ interface
|
|
|
'_palmos','_macos','_darwin','_emx','_watcom','_morphos','_netwlibc',
|
|
|
'_win64','_wince','_gba','_nds','_embedded','_symbian','_nativent',
|
|
|
'_iphonesim','_wii','_aix','_java','_android','_msdos','_aros',
|
|
|
- '_dragonfly','_win16','_wasm','_freertos'
|
|
|
+ '_dragonfly','_win16','_wasm','_freertos','_zxspectrum'
|
|
|
);
|
|
|
|
|
|
{ This table is kept OS,Cpu because it is easier to maintain (PFV) }
|
|
@@ -155,7 +156,8 @@ interface
|
|
|
{dragonfly} ( false, false, false, false, true, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false),
|
|
|
{ win16 } ( false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, true , false, false, false, false, false, false, false),
|
|
|
{ wasm } ( false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, true, false, false, false, false, false),
|
|
|
- { freertos }( false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, true , false)
|
|
|
+ { freertos }( false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, true , false),
|
|
|
+ {zxspectrum}( false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, false, true)
|
|
|
);
|
|
|
|
|
|
type
|