mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-21 12:29:46 +02:00
* initial revision
This commit is contained in:
parent
137ea3c5a4
commit
683a81bac8
35
rtl/morphos/emuld.inc
Normal file
35
rtl/morphos/emuld.inc
Normal file
@ -0,0 +1,35 @@
|
|||||||
|
{
|
||||||
|
$Id$
|
||||||
|
This file is part of the Free Pascal run time library.
|
||||||
|
|
||||||
|
emulinterface definitions for MorphOS/PowerPC
|
||||||
|
Copyright (c) 2002 The MorphOS Development Team, All Rights Reserved.
|
||||||
|
|
||||||
|
Free Pascal conversion
|
||||||
|
Copyright (c) 2004 Karoly Balogh for 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.
|
||||||
|
|
||||||
|
**********************************************************************}
|
||||||
|
|
||||||
|
{ * emulinterface structures from MorphOS SDK * }
|
||||||
|
|
||||||
|
type
|
||||||
|
PEmulLibEntry = ^TEmulLibEntry;
|
||||||
|
TEmulLibEntry = packed record
|
||||||
|
Trap : Word;
|
||||||
|
Extension: Word; { * MUST be set to 0 if you create it by hand * }
|
||||||
|
Func : Pointer;
|
||||||
|
end;
|
||||||
|
|
||||||
|
{
|
||||||
|
$Log$
|
||||||
|
Revision 1.1 2004-07-19 18:38:22 karoly
|
||||||
|
* initial revision
|
||||||
|
|
||||||
|
}
|
Loading…
Reference in New Issue
Block a user