mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-10 08:08:36 +02:00
MorphOS: moved system dependent units outside the RTL into the new morphunits package. also renamed some units to match classic Amiga and/or AROS naming
git-svn-id: trunk@28519 -
This commit is contained in:
Károly Balogh
parent
03a838556f
commit
85953d5e99
40
.gitattributes
vendored
40
.gitattributes
vendored
@ -5568,6 +5568,26 @@ packages/modplug/Makefile.fpc svneol=native#text/plain
|
||||
packages/modplug/Makefile.fpc.fpcmake svneol=native#text/plain
|
||||
packages/modplug/fpmake.pp svneol=native#text/plain
|
||||
packages/modplug/src/modplug.pas svneol=native#text/plain
|
||||
packages/morphunits/src/agraphics.pas svneol=native#text/plain
|
||||
packages/morphunits/src/ahi.pas svneol=native#text/plain
|
||||
packages/morphunits/src/amigados.pas svneol=native#text/plain
|
||||
packages/morphunits/src/amigalib.pas svneol=native#text/plain
|
||||
packages/morphunits/src/asl.pas svneol=native#text/plain
|
||||
packages/morphunits/src/clipboard.pas svneol=native#text/plain
|
||||
packages/morphunits/src/datatypes.pas svneol=native#text/plain
|
||||
packages/morphunits/src/exec.pas svneol=native#text/plain
|
||||
packages/morphunits/src/get9.pas svneol=native#text/plain
|
||||
packages/morphunits/src/hardware.pas svneol=native#text/plain
|
||||
packages/morphunits/src/inputevent.pas svneol=native#text/plain
|
||||
packages/morphunits/src/intuition.pas svneol=native#text/plain
|
||||
packages/morphunits/src/keymap.pas svneol=native#text/plain
|
||||
packages/morphunits/src/kvm.pas svneol=native#text/plain
|
||||
packages/morphunits/src/layers.pas svneol=native#text/plain
|
||||
packages/morphunits/src/mui.pas svneol=native#text/plain
|
||||
packages/morphunits/src/muihelper.pas svneol=native#text/plain
|
||||
packages/morphunits/src/timer.pas svneol=native#text/plain
|
||||
packages/morphunits/src/tinygl.pas svneol=native#text/plain
|
||||
packages/morphunits/src/utility.pas svneol=native#text/plain
|
||||
packages/mysql/Makefile svneol=native#text/plain
|
||||
packages/mysql/Makefile.fpc svneol=native#text/plain
|
||||
packages/mysql/Makefile.fpc.fpcmake svneol=native#text/plain
|
||||
@ -8567,40 +8587,20 @@ rtl/mipsel/strings.inc svneol=native#text/plain
|
||||
rtl/mipsel/stringss.inc svneol=native#text/plain
|
||||
rtl/morphos/Makefile svneol=native#text/plain
|
||||
rtl/morphos/Makefile.fpc svneol=native#text/plain
|
||||
rtl/morphos/aboxlib.pas -text svneol=unset#text/plain
|
||||
rtl/morphos/ahi.pas svneol=native#text/plain
|
||||
rtl/morphos/asl.pas svneol=native#text/plain
|
||||
rtl/morphos/clipboard.pas svneol=native#text/plain
|
||||
rtl/morphos/datatypes.pas -text svneol=unset#text/plain
|
||||
rtl/morphos/doslib.pp svneol=native#text/plain
|
||||
rtl/morphos/doslibd.inc svneol=native#text/plain
|
||||
rtl/morphos/doslibf.inc svneol=native#text/plain
|
||||
rtl/morphos/emuld.inc svneol=native#text/plain
|
||||
rtl/morphos/exec.pp svneol=native#text/plain
|
||||
rtl/morphos/execd.inc svneol=native#text/plain
|
||||
rtl/morphos/execf.inc svneol=native#text/plain
|
||||
rtl/morphos/get9.pas svneol=native#text/plain
|
||||
rtl/morphos/graphics.pas svneol=native#text/plain
|
||||
rtl/morphos/hardware.pas svneol=native#text/plain
|
||||
rtl/morphos/inputevent.pas svneol=native#text/plain
|
||||
rtl/morphos/intuition.pas svneol=native#text/plain
|
||||
rtl/morphos/keymap.pas svneol=native#text/plain
|
||||
rtl/morphos/kvm.pp svneol=native#text/plain
|
||||
rtl/morphos/layers.pas svneol=native#text/plain
|
||||
rtl/morphos/mui.pas -text svneol=unset#text/plain
|
||||
rtl/morphos/muihelper.pas -text svneol=unset#text/plain
|
||||
rtl/morphos/prt0.as svneol=native#text/plain
|
||||
rtl/morphos/sysosh.inc svneol=native#text/plain
|
||||
rtl/morphos/system.pp svneol=native#text/plain
|
||||
rtl/morphos/timer.pp svneol=native#text/plain
|
||||
rtl/morphos/timerd.inc svneol=native#text/plain
|
||||
rtl/morphos/timerf.inc svneol=native#text/plain
|
||||
rtl/morphos/tinygl.pp svneol=native#text/plain
|
||||
rtl/morphos/tthread.inc svneol=native#text/plain
|
||||
rtl/morphos/utild1.inc svneol=native#text/plain
|
||||
rtl/morphos/utild2.inc svneol=native#text/plain
|
||||
rtl/morphos/utilf.inc svneol=native#text/plain
|
||||
rtl/morphos/utility.pp svneol=native#text/plain
|
||||
rtl/msdos/Makefile svneol=native#text/plain
|
||||
rtl/msdos/Makefile.fpc svneol=native#text/plain
|
||||
rtl/msdos/classes.pp svneol=native#text/plain
|
||||
|
||||
@ -63,7 +63,7 @@ dirs_netwlibc=rtl-console fv zlib unzip
|
||||
dirs_palmos=palmunits
|
||||
dirs_go32v2=rtl-console fv graph unzip gdbint
|
||||
dirs_amiga=amunits
|
||||
dirs_morphos=rtl-console fv opengl sdl
|
||||
dirs_morphos=morphunits rtl-console fv opengl sdl
|
||||
dirs_wii=libogcfpc
|
||||
dirs_arm_nds=libndsfpc
|
||||
|
||||
|
||||
@ -71,6 +71,7 @@
|
||||
add_lua(ADirectory+IncludeTrailingPathDelimiter('lua'));
|
||||
add_mad(ADirectory+IncludeTrailingPathDelimiter('mad'));
|
||||
add_modplug(ADirectory+IncludeTrailingPathDelimiter('modplug'));
|
||||
add_morphunits(ADirectory+IncludeTrailingPathDelimiter('morphunits'));
|
||||
add_mysql(ADirectory+IncludeTrailingPathDelimiter('mysql'));
|
||||
add_ncurses(ADirectory+IncludeTrailingPathDelimiter('ncurses'));
|
||||
add_newt(ADirectory+IncludeTrailingPathDelimiter('newt'));
|
||||
|
||||
@ -416,6 +416,12 @@ begin
|
||||
{$include modplug/fpmake.pp}
|
||||
end;
|
||||
|
||||
procedure add_morphunits(const ADirectory: string);
|
||||
begin
|
||||
with Installer do
|
||||
{$include morphunits/fpmake.pp}
|
||||
end;
|
||||
|
||||
procedure add_mysql(const ADirectory: string);
|
||||
begin
|
||||
with Installer do
|
||||
|
||||
@ -29,6 +29,7 @@ begin
|
||||
P.IncludePath.Add('src');
|
||||
P.Dependencies.add('rtl-console');
|
||||
P.Dependencies.add('rtl-extra');
|
||||
P.Dependencies.add('morphunits',[morphos]);
|
||||
|
||||
T:=P.Targets.AddUnit('app.pas');
|
||||
with T.Dependencies do
|
||||
|
||||
@ -94,7 +94,7 @@ USES
|
||||
{$ENDIF}
|
||||
|
||||
{$IFDEF OS_AMIGA}
|
||||
doslib,
|
||||
amigados,
|
||||
{$ENDIF}
|
||||
|
||||
video,
|
||||
@ -824,7 +824,7 @@ end;
|
||||
{$IFDEF OS_AMIGA}
|
||||
begin
|
||||
{ AmigaOS Delay() wait's argument in 1/50 seconds }
|
||||
DOSLib.Delay(2);
|
||||
AmigaDOS.Delay(2);
|
||||
end;
|
||||
{$ENDIF OS_AMIGA}
|
||||
|
||||
|
||||
@ -20,7 +20,7 @@
|
||||
**********************************************************************}
|
||||
{$PACKRECORDS 2}
|
||||
|
||||
unit graphics;
|
||||
unit agraphics;
|
||||
|
||||
interface
|
||||
|
||||
2163
packages/morphunits/src/amigados.pas
Normal file
2163
packages/morphunits/src/amigados.pas
Normal file
File diff suppressed because it is too large
Load Diff
@ -16,7 +16,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit aboxlib;
|
||||
unit amigalib;
|
||||
|
||||
interface
|
||||
|
||||
@ -24,7 +24,7 @@ unit asl;
|
||||
|
||||
interface
|
||||
|
||||
uses exec, utility, {workbench,} graphics;
|
||||
uses exec, utility, {workbench,} agraphics;
|
||||
|
||||
|
||||
{************************************************************************}
|
||||
@ -24,8 +24,8 @@ unit datatypes;
|
||||
|
||||
interface
|
||||
|
||||
uses exec, doslib, intuition, utility,
|
||||
graphics{, iffparse, amigaprinter, prtbase};
|
||||
uses exec, amigados, intuition, utility,
|
||||
agraphics{, iffparse, amigaprinter, prtbase};
|
||||
|
||||
const
|
||||
{***************************************************************************}
|
||||
2377
packages/morphunits/src/exec.pas
Normal file
2377
packages/morphunits/src/exec.pas
Normal file
File diff suppressed because it is too large
Load Diff
@ -25,7 +25,7 @@ unit intuition;
|
||||
interface
|
||||
|
||||
uses
|
||||
exec, graphics, utility, inputevent, timer, layers;
|
||||
exec, agraphics, utility, inputevent, timer, layers;
|
||||
|
||||
|
||||
{
|
||||
@ -19,7 +19,7 @@ unit kvm;
|
||||
interface
|
||||
|
||||
uses
|
||||
exec, intuition, graphics;
|
||||
exec, intuition, agraphics;
|
||||
|
||||
|
||||
function initKVM: boolean;
|
||||
@ -24,7 +24,7 @@ unit layers;
|
||||
|
||||
interface
|
||||
|
||||
uses exec, graphics, utility;
|
||||
uses exec, agraphics, utility;
|
||||
|
||||
const
|
||||
LAYERSIMPLE = 1;
|
||||
@ -129,7 +129,7 @@ interface
|
||||
Items marked with "Custom Class" are for use in custom classes only!
|
||||
}
|
||||
|
||||
uses exec, intuition,utility,graphics{,iffparse};
|
||||
uses exec, intuition,utility,agraphics{,iffparse};
|
||||
{$WARNING IffParse required, look for FIX ME!!!}
|
||||
|
||||
var
|
||||
@ -23,7 +23,7 @@ unit muihelper;
|
||||
|
||||
interface
|
||||
|
||||
uses intuition, mui, doslib, utility;
|
||||
uses intuition, mui, amigados, utility;
|
||||
|
||||
|
||||
const
|
||||
101
packages/morphunits/src/timer.pas
Normal file
101
packages/morphunits/src/timer.pas
Normal file
@ -0,0 +1,101 @@
|
||||
{
|
||||
This file is part of the Free Pascal run time library.
|
||||
Copyright (c) 2004 Karoly Balogh for Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
timer.device interface unit for MorphOS/PowerPC
|
||||
|
||||
MorphOS port was done on a free Pegasos II/G4 machine
|
||||
provided by Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit timer;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
exec;
|
||||
|
||||
var
|
||||
TimerBase : Pointer;
|
||||
|
||||
|
||||
{ * timer.device definitions (V50)
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
|
||||
const
|
||||
UNIT_MICROHZ = 0;
|
||||
UNIT_VBLANK = 1;
|
||||
UNIT_ECLOCK = 2;
|
||||
UNIT_WAITUNTIL = 3;
|
||||
UNIT_WAITECLOCK = 4;
|
||||
{ *** V50 *** }
|
||||
UNIT_CPUCLOCK = 5;
|
||||
UNIT_WAITCPUCLOCK = 6;
|
||||
|
||||
const
|
||||
TIMERNAME = 'timer.device';
|
||||
|
||||
|
||||
type
|
||||
PTimeVal = ^TTimeVal;
|
||||
TTimeVal = packed record
|
||||
tv_secs : DWord;
|
||||
tv_micro: DWord;
|
||||
end;
|
||||
|
||||
type
|
||||
PEClockVal = ^TEClockVal;
|
||||
TEClockVal = packed record
|
||||
ev_hi: DWord;
|
||||
ev_lo: DWord;
|
||||
end;
|
||||
|
||||
type
|
||||
PTimeRequest = ^TTimeRequest;
|
||||
TTimeRequest = packed record
|
||||
tr_node: TIORequest;
|
||||
tr_time: TTimeVal;
|
||||
end;
|
||||
|
||||
|
||||
const
|
||||
TR_ADDREQUEST = (CMD_NONSTD);
|
||||
TR_GETSYSTIME = (CMD_NONSTD + 1);
|
||||
TR_SETSYSTIME = (CMD_NONSTD + 2);
|
||||
|
||||
|
||||
procedure AddTime(Dest : PTimeVal location 'a0';
|
||||
Source: PTimeVal location 'a1');
|
||||
SysCall TimerBase 42;
|
||||
|
||||
procedure SubTime(Dest : PTimeVal location 'a0';
|
||||
Source: PTimeVal location 'a1');
|
||||
SysCall TimerBase 48;
|
||||
|
||||
function CmpTime(Dest : PTimeVal location 'a0';
|
||||
Source: PTimeVal location 'a1'): LongInt;
|
||||
SysCall TimerBase 54;
|
||||
|
||||
function ReadEClock(Dest: PTimeVal location 'a0'): DWord;
|
||||
SysCall TimerBase 60;
|
||||
|
||||
procedure GetSysTime(Dest: PTimeVal location 'a0');
|
||||
SysCall TimerBase 66;
|
||||
|
||||
{.$include timerd.inc}
|
||||
{.$include timerf.inc}
|
||||
|
||||
implementation
|
||||
|
||||
begin
|
||||
end.
|
||||
366
packages/morphunits/src/utility.pas
Normal file
366
packages/morphunits/src/utility.pas
Normal file
@ -0,0 +1,366 @@
|
||||
{
|
||||
This file is part of the Free Pascal run time library.
|
||||
Copyright (c) 2004 Karoly Balogh for Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
utility.library interface unit for MorphOS/PowerPC
|
||||
|
||||
MorphOS port was done on a free Pegasos II/G4 machine
|
||||
provided by Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
{$inline on}
|
||||
unit utility;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
exec;
|
||||
|
||||
var
|
||||
UtilityBase: Pointer;
|
||||
|
||||
|
||||
{ * utility.library date defines
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
|
||||
type
|
||||
PClockData = ^TClockData;
|
||||
TClockData = packed record
|
||||
sec : Word;
|
||||
min : Word;
|
||||
hour : Word;
|
||||
mday : Word;
|
||||
month: Word;
|
||||
year : Word;
|
||||
wday : Word;
|
||||
end;
|
||||
|
||||
|
||||
|
||||
{ * utility.library tagitem defines
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
|
||||
type
|
||||
Tag = Cardinal;
|
||||
|
||||
type
|
||||
PPTagItem = ^PTagItem;
|
||||
PTagItem = ^TTagItem;
|
||||
TTagItem = packed record
|
||||
ti_Tag : Tag;
|
||||
ti_Data: Cardinal;
|
||||
end;
|
||||
|
||||
|
||||
const
|
||||
TAG_DONE = 0;
|
||||
TAG_END = 0;
|
||||
TAG_IGNORE = 1;
|
||||
TAG_MORE = 2;
|
||||
TAG_SKIP = 3;
|
||||
|
||||
const
|
||||
TAG_USER = 1 Shl 31;
|
||||
|
||||
const
|
||||
TAGFILTER_AND = 0;
|
||||
TAGFILTER_NOT = 1;
|
||||
|
||||
const
|
||||
MAP_REMOVE_NOT_FOUND = 0;
|
||||
MAP_KEEP_NOT_FOUND = 1;
|
||||
|
||||
|
||||
|
||||
{ * utility.library namespace defines
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
|
||||
type
|
||||
PNamedObject = ^TNamedObject;
|
||||
TNamedObject = packed record
|
||||
no_Object: Pointer;
|
||||
end;
|
||||
|
||||
|
||||
const
|
||||
ANO_NameSpace = 4000;
|
||||
ANO_UserSpace = 4001;
|
||||
ANO_Priority = 4002;
|
||||
ANO_Flags = 4003;
|
||||
|
||||
NSB_NODUPS = 0;
|
||||
NSB_CASE = 1;
|
||||
|
||||
NSF_NODUPS = 1 Shl NSB_NODUPS;
|
||||
NSF_CASE = 1 Shl NSB_CASE;
|
||||
|
||||
|
||||
|
||||
{ * utility.library pack attributes and macros
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
|
||||
const
|
||||
PSTB_SIGNED = 31;
|
||||
PSTB_UNPACK = 30;
|
||||
PSTB_PACK = 29;
|
||||
PSTB_EXISTS = 26;
|
||||
|
||||
PSTF_SIGNED = (1 Shl PSTB_SIGNED);
|
||||
PSTF_UNPACK = (1 Shl PSTB_UNPACK);
|
||||
PSTF_PACK = (1 Shl PSTB_PACK);
|
||||
PSTF_EXISTS = (1 Shl PSTB_EXISTS);
|
||||
|
||||
const
|
||||
PKCTRL_PACKUNPACK = $00000000;
|
||||
PKCTRL_PACKONLY = $40000000;
|
||||
PKCTRL_UNPACKONLY = $20000000;
|
||||
|
||||
PKCTRL_BYTE = $80000000;
|
||||
PKCTRL_WORD = $88000000;
|
||||
PKCTRL_LONG = $90000000;
|
||||
|
||||
PKCTRL_UBYTE = $00000000;
|
||||
PKCTRL_UWORD = $08000000;
|
||||
PKCTRL_ULONG = $10000000;
|
||||
|
||||
PKCTRL_BIT = $18000000;
|
||||
PKCTRL_FLIPBIT = $98000000;
|
||||
|
||||
{$WARNING FIX ME!!! Some macros to convert}
|
||||
{
|
||||
PK_BITNUM1(flg) ((flg) == 0x01 ? 0 : (flg) == 0x02 ? 1 : (flg) == 0x04 ? 2 : (flg) == 0x08 ? 3 : (flg) == 0x10 ? 4 : (flg) == 0x20 ? 5 : (flg) == 0x40 ? 6 : 7)
|
||||
PK_BITNUM2(flg) ((flg < 0x100 ? PK_BITNUM1(flg) : 8 + PK_BITNUM1(flg >> 8)))
|
||||
PK_BITNUM(flg) ((flg < 0x10000 ? PK_BITNUM2(flg) : 16 + PK_BITNUM2(flg >> 16)))
|
||||
PK_WORDOFFSET(flg) ((flg) < 0x100 ? 1 : 0)
|
||||
PK_LONGOFFSET(flg) ((flg) < 0x100 ? 3 : (flg) < 0x10000 ? 2 : (flg) < 0x1000000 ? 1 : 0)
|
||||
PK_CALCOFFSET(type,field) ((ULONG)(&((struct type *)0)->field))
|
||||
|
||||
|
||||
PACK_STARTTABLE(tagbase) (tagbase)
|
||||
PACK_NEWOFFSET(tagbase) (-1L),(tagbase)
|
||||
PACK_ENDTABLE 0
|
||||
PACK_ENTRY(tagbase,tag,type,field,control) (control | ((tag-tagbase) << 16L) | PK_CALCOFFSET(type,field))
|
||||
PACK_BYTEBIT(tagbase,tag,type,field,control,flags) (control | ((tag-tagbase) << 16L) | PK_CALCOFFSET(type,field) | (PK_BITNUM(flags) << 13L))
|
||||
PACK_WORDBIT(tagbase,tag,type,field,control,flags) (control | ((tag-tagbase) << 16L) | (PK_CALCOFFSET(type,field) + PK_WORDOFFSET(flags)) | ((PK_BITNUM(flags) & 7) << 13L))
|
||||
PACK_LONGBIT(tagbase,tag,type,field,control,flags) (control | ((tag-tagbase) << 16L) | (PK_CALCOFFSET(type,field) + PK_LONGOFFSET(flags)) | ((PK_BITNUM(flags) & 7) << 13L))
|
||||
}
|
||||
|
||||
{ * utility.library include
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
|
||||
const
|
||||
UtilityName = 'utility.library';
|
||||
|
||||
|
||||
type
|
||||
PUtilityBase = ^TUtilityName;
|
||||
TUtilityName = packed record
|
||||
ub_LibNode : TLibrary;
|
||||
ub_Language: Byte;
|
||||
ub_Reserved: Byte;
|
||||
end;
|
||||
|
||||
|
||||
|
||||
{ * utility.library hook defines
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
|
||||
type
|
||||
PHook = ^THook;
|
||||
THook = packed record
|
||||
h_MinNode : TMinNode;
|
||||
h_Entry : Cardinal;
|
||||
h_SubEntry: Cardinal;
|
||||
h_Data : Pointer;
|
||||
end;
|
||||
|
||||
|
||||
function FindTagItem(tagVal : Cardinal location 'd0';
|
||||
tagList: PTagItem location 'a0'): PTagItem;
|
||||
SysCall MOS_UtilityBase 030;
|
||||
|
||||
function GetTagData(tagValue : Cardinal location 'd0';
|
||||
defaultVal: Cardinal location 'd1';
|
||||
tagList : PTagItem location 'a0'): Cardinal;
|
||||
SysCall MOS_UtilityBase 036;
|
||||
|
||||
function PackBoolTags(initialFlags: Cardinal location 'd0';
|
||||
tagList : PTagItem location 'a0';
|
||||
boolMap : PTagItem location 'a1'): Cardinal;
|
||||
SysCall MOS_UtilityBase 042;
|
||||
|
||||
function NextTagItem(tagListPtr: pPTagItem location 'a0'): PTagItem;
|
||||
SysCall MOS_UtilityBase 048;
|
||||
|
||||
procedure FilterTagChanges(changeList : PTagItem location 'a0';
|
||||
originalList: PTagItem location 'a1';
|
||||
apply : Cardinal location 'd0');
|
||||
SysCall MOS_UtilityBase 054;
|
||||
|
||||
procedure MapTags(tagList: PTagItem location 'a0';
|
||||
mapList: PTagItem location 'a1';
|
||||
mapType: Cardinal location 'd0');
|
||||
SysCall MOS_UtilityBase 060;
|
||||
|
||||
function AllocateTagItems(numTags: Cardinal location 'd0'): PTagItem;
|
||||
SysCall MOS_UtilityBase 066;
|
||||
|
||||
function CloneTagItems(tagList: PTagItem location 'a0'): PTagItem;
|
||||
SysCall MOS_UtilityBase 072;
|
||||
|
||||
procedure FreeTagItems(tagList: PTagItem location 'a0');
|
||||
SysCall MOS_UtilityBase 078;
|
||||
|
||||
procedure RefreshTagItemClones(clone : PTagItem location 'a0';
|
||||
original: PTagItem location 'a1');
|
||||
SysCall MOS_UtilityBase 084;
|
||||
|
||||
function TagInArray(tagValue : Cardinal location 'd0';
|
||||
var tagArray: Cardinal location 'a0'): Boolean;
|
||||
SysCall MOS_UtilityBase 090;
|
||||
|
||||
function FilterTagItems(tagList : PTagItem location 'a0';
|
||||
var filterArray: Cardinal location 'a1';
|
||||
logic : Cardinal location 'd0'): Cardinal;
|
||||
SysCall MOS_UtilityBase 096;
|
||||
|
||||
function CallHookPkt(hook : PHook location 'a0';
|
||||
hobject : Pointer location 'a2';
|
||||
paramPacket: Pointer location 'a1'): Cardinal;
|
||||
SysCall MOS_UtilityBase 102;
|
||||
|
||||
procedure Amiga2Date(seconds: Cardinal location 'd0';
|
||||
result : PClockData location 'a0');
|
||||
SysCall MOS_UtilityBase 120;
|
||||
|
||||
function Date2Amiga(date: PClockData location 'a0'): Cardinal;
|
||||
SysCall MOS_UtilityBase 126;
|
||||
|
||||
function CheckDate(date: PClockData location 'a0'): Cardinal;
|
||||
SysCall MOS_UtilityBase 132;
|
||||
|
||||
function SMult32(arg1: LongInt location 'd0';
|
||||
arg2: LongInt location 'd1'): LongInt;
|
||||
SysCall MOS_UtilityBase 138;
|
||||
|
||||
function UMult32(arg1: Cardinal location 'd0';
|
||||
arg2: Cardinal location 'd1'): Cardinal;
|
||||
SysCall MOS_UtilityBase 144;
|
||||
|
||||
function SDivMod32(dividend: LongInt location 'd0';
|
||||
divisor: LongInt location 'd1'): LongInt;
|
||||
SysCall MOS_UtilityBase 150;
|
||||
|
||||
function UDivMod32(dividend: Cardinal location 'd0';
|
||||
divisor : Cardinal location 'd1'): Cardinal;
|
||||
SysCall MOS_UtilityBase 156;
|
||||
|
||||
function Stricmp(string1: PChar location 'a0';
|
||||
string2: PChar location 'a1'): LongInt;
|
||||
SysCall MOS_UtilityBase 162;
|
||||
|
||||
function Strnicmp(string1: PChar location 'a0';
|
||||
string2: PChar location 'a1';
|
||||
length : LongInt location 'd0'): LongInt;
|
||||
SysCall MOS_UtilityBase 168;
|
||||
|
||||
function ToUpper(character: Cardinal location 'd0'): Char;
|
||||
SysCall MOS_UtilityBase 174;
|
||||
|
||||
function ToLower(character: Cardinal location 'd0'): Char;
|
||||
SysCall MOS_UtilityBase 180;
|
||||
|
||||
procedure ApplyTagChanges(list : PTagItem location 'a0';
|
||||
changeList: PTagItem location 'a1');
|
||||
SysCall MOS_UtilityBase 186;
|
||||
|
||||
function SMult64(arg1: LongInt location 'd0';
|
||||
arg2: LongInt location 'd1'): LongInt;
|
||||
SysCall MOS_UtilityBase 198;
|
||||
|
||||
function UMult64(arg1: Cardinal location 'd0';
|
||||
arg2: Cardinal location 'd1'): Cardinal;
|
||||
SysCall MOS_UtilityBase 204;
|
||||
|
||||
function PackStructureTags(pack : Pointer location 'a0';
|
||||
var packTable: Cardinal location 'a1';
|
||||
tagList : PTagItem location 'a2'): Cardinal;
|
||||
SysCall MOS_UtilityBase 210;
|
||||
|
||||
function UnpackStructureTags(pack : Pointer location 'a0';
|
||||
var packTable: Cardinal location 'a1';
|
||||
tagList : PTagItem location 'a2'): Cardinal;
|
||||
SysCall MOS_UtilityBase 216;
|
||||
|
||||
function AddNamedObject(nameSpace: PNamedObject location 'a0';
|
||||
nobject : PNamedObject location 'a1'): Boolean;
|
||||
SysCall MOS_UtilityBase 222;
|
||||
|
||||
function AllocNamedObjectA(name : PChar location 'a0';
|
||||
tagList: PTagItem location 'a1'): PNamedObject;
|
||||
SysCall MOS_UtilityBase 228;
|
||||
|
||||
function AttemptRemNamedObject(nobject: PNamedObject location 'a0'): LongInt;
|
||||
SysCall MOS_UtilityBase 234;
|
||||
|
||||
function FindNamedObject(nameSpace : PNamedObject location 'a0';
|
||||
name : PChar location 'a1';
|
||||
lastObject: PNamedObject location 'a2'): PNamedObject;
|
||||
SysCall MOS_UtilityBase 240;
|
||||
|
||||
procedure FreeNamedObject(nobject: PNamedObject location 'a0');
|
||||
SysCall MOS_UtilityBase 246;
|
||||
|
||||
function NamedObjectName(nobject: PNamedObject location 'a0'): PChar;
|
||||
SysCall MOS_UtilityBase 252;
|
||||
|
||||
procedure ReleaseNamedObject(nobject: pNamedObject location 'a0');
|
||||
SysCall MOS_UtilityBase 258;
|
||||
|
||||
procedure RemNamedObject(nobject: PNamedObject location 'a0';
|
||||
message: PMessage location 'a1');
|
||||
SysCall MOS_UtilityBase 264;
|
||||
|
||||
function GetUniqueID: Cardinal;
|
||||
SysCall MOS_UtilityBase 270;
|
||||
|
||||
|
||||
function TAG_(value: pointer): longword; inline;
|
||||
function TAG_(value: pchar): longword; inline;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
function TAG_(value: pointer): longword; inline;
|
||||
begin
|
||||
TAG_:=longword(value);
|
||||
end;
|
||||
|
||||
function TAG_(value: pchar): longword; inline;
|
||||
begin
|
||||
TAG_:=longword(value);
|
||||
end;
|
||||
|
||||
|
||||
begin
|
||||
UtilityBase:=MOS_UtilityBase;
|
||||
end.
|
||||
@ -22,6 +22,7 @@ begin
|
||||
P.Dependencies.Add('x11',AllUnixOSes-[darwin,iphonesim]);
|
||||
if Defaults.CPU<>arm then
|
||||
P.Dependencies.Add('x11',[darwin]);
|
||||
P.Dependencies.Add('morphunits',[morphos]);
|
||||
|
||||
P.SourcePath.Add('src');
|
||||
P.IncludePath.Add('src');
|
||||
|
||||
@ -44,6 +44,7 @@ begin
|
||||
P.Description := 'Rtl-console, console abstraction';
|
||||
P.NeedLibC:= false;
|
||||
P.Dependencies.Add('rtl-extra'); // linux,android gpm.
|
||||
P.Dependencies.Add('morphunits',[morphos]);
|
||||
|
||||
P.SourcePath.Add('src/inc');
|
||||
P.SourcePath.Add('src/$(OS)');
|
||||
|
||||
@ -37,7 +37,7 @@ var
|
||||
implementation
|
||||
|
||||
uses
|
||||
exec, graphics;
|
||||
exec, agraphics;
|
||||
|
||||
{$i video.inc}
|
||||
|
||||
|
||||
@ -52,6 +52,7 @@ begin
|
||||
P.Email := '';
|
||||
P.Description := 'Rtl-extra, RTL not needed for bootstrapping';
|
||||
P.NeedLibC:= false;
|
||||
P.Dependencies.Add('morphunits',[morphos]);
|
||||
|
||||
P.SourcePath.Add('src/inc');
|
||||
P.SourcePath.Add('src/$(OS)');
|
||||
|
||||
@ -21,6 +21,7 @@ begin
|
||||
P.IncludePath.Add('src');
|
||||
P.Dependencies.Add('x11',AllUnixOSes);
|
||||
P.Dependencies.Add('pthreads',AllUnixOSes);
|
||||
P.Dependencies.Add('morphunits',[morphos]);
|
||||
if Defaults.CPU=arm then
|
||||
P.OSes := P.OSes - [darwin];
|
||||
P.OSes := P.OSes - [iphonesim,os2,emx,go32v2,watcom,nativent,embedded,android,amiga,aros,msdos];
|
||||
|
||||
@ -342,232 +342,232 @@ endif
|
||||
OBJPASDIR=$(RTL)/objpas
|
||||
GRAPHDIR=$(INC)/graph
|
||||
ifeq ($(FULL_TARGET),i386-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-go32v2)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-win32)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-os2)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-freebsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-beos)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-haiku)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-solaris)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-qnx)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netware)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-openbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-wdosx)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-darwin)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-emx)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-watcom)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netwlibc)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-wince)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-embedded)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-symbian)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-nativent)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-iphonesim)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-android)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-aros)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-freebsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-netbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-amiga)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-atari)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-openbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-palmos)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-embedded)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-netbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-amiga)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-macos)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-darwin)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-morphos)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-embedded)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-wii)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-aix)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-netbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-solaris)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-embedded)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-freebsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-netbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-solaris)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-openbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-darwin)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-win64)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-embedded)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-palmos)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-darwin)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-wince)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-gba)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-nds)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-embedded)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-symbian)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-android)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc64-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc64-darwin)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc64-embedded)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc64-aix)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),avr-embedded)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),armeb-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),armeb-embedded)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),mips-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),mipsel-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),mipsel-embedded)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),mipsel-android)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),jvm-java)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),jvm-android)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i8086-msdos)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst exec timer doslib utility hardware inputevent keymap graphics layers intuition aboxlib mui kvm clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings dos heaptrc ctypes sysutils classes fgl math typinfo charset cpall getopts types rtlconsts sysconst
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-linux)
|
||||
override TARGET_IMPLICITUNITS+=cp1250 cp1251 cp1252 cp1253 cp1254 cp1255 cp1256 cp1257 cp1258 cp437 cp646 cp850 cp856 cp866 cp874 cp8859_1 cp8859_5 cp8859_2 cp852
|
||||
|
||||
@ -11,15 +11,16 @@ units=$(SYSTEMUNIT) uuchar objpas macpas iso7185 strings \
|
||||
dos heaptrc ctypes \
|
||||
sysutils classes fgl math typinfo \
|
||||
charset cpall getopts \
|
||||
types rtlconsts sysconst \
|
||||
exec timer doslib utility hardware inputevent keymap graphics layers \
|
||||
intuition aboxlib mui \
|
||||
types rtlconsts sysconst
|
||||
|
||||
# exec timer doslib utility hardware inputevent keymap graphics layers
|
||||
# intuition aboxlib mui
|
||||
# these units are here, because they depend on system interface units above
|
||||
kvm \
|
||||
# kvm \
|
||||
# disabled temporarily because it doesn't build
|
||||
# sockets \
|
||||
# these can be moved to packages later
|
||||
clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
# clipboard datatypes asl ahi tinygl get9 muihelper
|
||||
#implicitunits=exeinfo\
|
||||
implicitunits=cp1250 cp1251 cp1252 cp1253 cp1254 cp1255 cp1256 cp1257 cp1258 \
|
||||
cp437 cp646 cp850 cp856 cp866 cp874 cp8859_1 cp8859_5 cp8859_2 cp852
|
||||
|
||||
@ -1,136 +0,0 @@
|
||||
{
|
||||
This file is part of the Free Pascal run time library.
|
||||
Copyright (c) 2004 Karoly Balogh for Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
dos.library interface unit for MorphOS/PowerPC
|
||||
|
||||
MorphOS port was done on a free Pegasos II/G4 machine
|
||||
provided by Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
{$INLINE ON}
|
||||
|
||||
unit doslib;
|
||||
|
||||
interface
|
||||
|
||||
uses Exec, Timer;
|
||||
|
||||
var
|
||||
DosBase: Pointer;
|
||||
|
||||
|
||||
{$include doslibd.inc}
|
||||
{$include doslibf.inc}
|
||||
|
||||
|
||||
{ * dos global definitions (V50)
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
function BADDR(x: LongInt): Pointer; Inline;
|
||||
function MKBADDR(x: Pointer): LongInt; Inline;
|
||||
|
||||
|
||||
{ * dos stdio definitions
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
function ReadChar: LongInt; Inline;
|
||||
function WriteChar(ch: Char): LongInt; Inline;
|
||||
function UnReadChar(ch: Char): LongInt; Inline;
|
||||
function ReadChars(buf: Pointer; num: LongInt): LongInt; Inline;
|
||||
function dosReadLn(buf: PChar; num: LongInt): PChar; Inline;
|
||||
function WriteStr(str: PChar): LongInt; Inline;
|
||||
procedure VWritef(format: PChar; argv: Pointer); Inline;
|
||||
|
||||
|
||||
{ * calls with tags workarounds (should be removed later)
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
function CreateNewProcTags(tags: array of dword): PProcess; Inline;
|
||||
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
|
||||
{ * dos stdio definitions
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
function ReadChar: LongInt; Inline;
|
||||
begin
|
||||
ReadChar:=FGetC(dosInput);
|
||||
end;
|
||||
|
||||
function WriteChar(ch: Char): LongInt; Inline;
|
||||
begin
|
||||
WriteChar:=FPutC(dosOutput,Byte(ch));
|
||||
end;
|
||||
|
||||
function UnReadChar(ch: Char): LongInt; Inline;
|
||||
begin
|
||||
UnReadChar:=UnGetC(dosInput,Byte(ch));
|
||||
end;
|
||||
|
||||
function ReadChars(buf: Pointer; num: LongInt): LongInt; Inline;
|
||||
begin
|
||||
ReadChars:=FRead(dosInput,buf,1,num);
|
||||
end;
|
||||
|
||||
function dosReadLn(buf: PChar; num: LongInt): PChar; Inline;
|
||||
begin
|
||||
dosReadLn:=FGets(dosInput,buf,num);
|
||||
end;
|
||||
|
||||
function WriteStr(str: PChar): LongInt; Inline;
|
||||
begin
|
||||
WriteStr:=FPuts(dosOutput,str);
|
||||
end;
|
||||
|
||||
procedure VWritef(format: PChar; argv: Pointer); Inline;
|
||||
begin
|
||||
VFWritef(dosOutput,format,argv);
|
||||
end;
|
||||
|
||||
|
||||
|
||||
{ * dos global definitions (V50)
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
|
||||
function BADDR(x: LongInt): Pointer; Inline;
|
||||
begin
|
||||
BADDR:=Pointer(x Shl 2);
|
||||
end;
|
||||
|
||||
function MKBADDR(x: Pointer): LongInt; Inline;
|
||||
begin
|
||||
MKBADDR:=LongInt(x) Shr 2;
|
||||
end;
|
||||
|
||||
|
||||
|
||||
{ * calls with tags workarounds (should be removed later)
|
||||
*********************************************************************
|
||||
* }
|
||||
|
||||
function CreateNewProcTags(tags: array of DWord): PProcess; Inline;
|
||||
begin
|
||||
CreateNewProcTags:=CreateNewProc(@tags);
|
||||
end;
|
||||
|
||||
|
||||
begin
|
||||
DosBase:=MOS_DOSBase;
|
||||
end.
|
||||
@ -1,51 +0,0 @@
|
||||
{
|
||||
This file is part of the Free Pascal run time library.
|
||||
Copyright (c) 2004 Karoly Balogh for Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
exec.library interface unit for MorphOS/PowerPC
|
||||
|
||||
MorphOS port was done on a free Pegasos II/G4 machine
|
||||
provided by Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit exec;
|
||||
|
||||
interface
|
||||
|
||||
var
|
||||
ExecBase: Pointer;
|
||||
|
||||
{$include execd.inc}
|
||||
{$include execf.inc}
|
||||
|
||||
|
||||
function NewGetTaskAttrs(Task : PTask;
|
||||
Data : Pointer;
|
||||
DataSize: Cardinal;
|
||||
TType : Cardinal;
|
||||
Tags : array of DWord): Cardinal; Inline;
|
||||
|
||||
implementation
|
||||
|
||||
|
||||
function NewGetTaskAttrs(Task : PTask;
|
||||
Data : Pointer;
|
||||
DataSize: Cardinal;
|
||||
TType : Cardinal;
|
||||
Tags : array of DWord): Cardinal; Inline;
|
||||
begin
|
||||
NewGetTaskAttrs:=NewGetTaskAttrsA(Task,Data,DataSize,TType,@Tags);
|
||||
end;
|
||||
|
||||
|
||||
begin
|
||||
ExecBase:=MOS_ExecBase;
|
||||
end.
|
||||
@ -1,35 +0,0 @@
|
||||
{
|
||||
This file is part of the Free Pascal run time library.
|
||||
Copyright (c) 2004 Karoly Balogh for Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
timer.device interface unit for MorphOS/PowerPC
|
||||
|
||||
MorphOS port was done on a free Pegasos II/G4 machine
|
||||
provided by Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit timer;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
exec;
|
||||
|
||||
var
|
||||
TimerBase : Pointer;
|
||||
|
||||
{$include timerd.inc}
|
||||
{$include timerf.inc}
|
||||
|
||||
implementation
|
||||
|
||||
begin
|
||||
end.
|
||||
@ -1,52 +0,0 @@
|
||||
{
|
||||
This file is part of the Free Pascal run time library.
|
||||
Copyright (c) 2004 Karoly Balogh for Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
utility.library interface unit for MorphOS/PowerPC
|
||||
|
||||
MorphOS port was done on a free Pegasos II/G4 machine
|
||||
provided by Genesi S.a.r.l. <www.genesi.lu>
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
{$inline on}
|
||||
unit utility;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
exec;
|
||||
|
||||
var
|
||||
UtilityBase: Pointer;
|
||||
|
||||
{$include utild1.inc}
|
||||
{$include utild2.inc}
|
||||
{$include utilf.inc}
|
||||
|
||||
function TAG_(value: pointer): longword; inline;
|
||||
function TAG_(value: pchar): longword; inline;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
function TAG_(value: pointer): longword; inline;
|
||||
begin
|
||||
TAG_:=longword(value);
|
||||
end;
|
||||
|
||||
function TAG_(value: pchar): longword; inline;
|
||||
begin
|
||||
TAG_:=longword(value);
|
||||
end;
|
||||
|
||||
|
||||
begin
|
||||
UtilityBase:=MOS_UtilityBase;
|
||||
end.
|
||||
Loading…
Reference in New Issue
Block a user