initial import

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@1 3ad0048d-3df7-0310-abae-a5850022a9f2

12 files changed, 839 insertions, 0 deletions

diff --git a/rtl/palmos/api/common.inc b/rtl/palmos/api/common.inc
new file mode 100644
index 0000000000..d7083c0192
--- /dev/null
+++ b/rtl/palmos/api/common.inc
@@ -0,0 +1,109 @@
+{
+Copyright © 1995 - 1998, 3Com Corporation or its subsidiaries ("3Com").
+All rights reserved.
+
+This software may be copied and used solely for developing products for
+the Palm Computing platform and for archival and backup purposes.  Except
+for the foregoing, no part of this software may be reproduced or transmitted
+in any form or by any means or used to make any derivative work (such as
+translation, transformation or adaptation) without express written consent
+from 3Com.
+
+3Com reserves the right to revise this software and to make changes in content
+from time to time without obligation on the part of 3Com to provide notification
+of such revision or changes.
+3COM MAKES NO REPRESENTATIONS OR WARRANTIES THAT THE SOFTWARE IS FREE OF ERRORS
+OR THAT THE SOFTWARE IS SUITABLE FOR YOUR USE.  THE SOFTWARE IS PROVIDED ON AN
+"AS IS" BASIS.  3COM MAKES NO WARRANTIES, TERMS OR CONDITIONS, EXPRESS OR IMPLIED,
+EITHER IN FACT OR BY OPERATION OF LAW, STATUTORY OR OTHERWISE, INCLUDING WARRANTIES,
+TERMS, OR CONDITIONS OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, AND
+SATISFACTORY QUALITY.
+
+TO THE FULL EXTENT ALLOWED BY LAW, 3COM ALSO EXCLUDES FOR ITSELF AND ITS SUPPLIERS
+ANY LIABILITY, WHETHER BASED IN CONTRACT OR TORT (INCLUDING NEGLIGENCE), FOR
+DIRECT, INCIDENTAL, CONSEQUENTIAL, INDIRECT, SPECIAL, OR PUNITIVE DAMAGES OF
+ANY KIND, OR FOR LOSS OF REVENUE OR PROFITS, LOSS OF BUSINESS, LOSS OF INFORMATION
+OR DATA, OR OTHER FINANCIAL LOSS ARISING OUT OF OR IN CONNECTION WITH THIS SOFTWARE,
+EVEN IF 3COM HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
+
+3Com, HotSync, Palm Computing, and Graffiti are registered trademarks, and
+Palm III and Palm OS are trademarks of 3Com Corporation or its subsidiaries.
+
+IF THIS SOFTWARE IS PROVIDED ON A COMPACT DISK, THE OTHER SOFTWARE AND
+DOCUMENTATION ON THE COMPACT DISK ARE SUBJECT TO THE LICENSE AGREEMENT
+ACCOMPANYING THE COMPACT DISK.
+
+ -------------------------------------------------------------------
+  FileName:
+             Common.inc
+
+  Description:
+             Common include file for all Pilot routines.
+             Contains elementary data types
+
+  History:
+     10/19/94  RM - Created by Ron Marianetti
+      4/24/97  SL - Changes for PalmOS 2.0 SDK
+      8/05/98  Converted to pascal by Florian Klaempfl
+
+}
+    { Elementary data types }
+
+    { Fixed size data types }
+    type
+       SByte = char;      // I'am not sure about that (FK)
+       UInt16 = word;
+       UInt32 = cardinal;
+       SWord = integer;
+       Int16 = integer;
+       SDWord = longint;
+       Int32 = longint;
+       DWord = cardinal;
+       UChar = char;      // I'am not sure about that (FK)
+       Short = integer;
+       UShort = word;
+       Int = integer;
+       UInt = word;
+       Long = longint;
+       ULong = cardinal;
+       Err = integer;
+       LocalID = DWord;
+
+       { Pointer Types }
+       VoidPtr = pointer;
+       VoidHand = ^VoidPtr;
+       SBytePtr = ^SByte;
+       BytePtr = ^Byte;
+       SWordPtr = ^SWord;
+       WordPtr = ^Word;
+       UInt16Ptr = ^word;
+       SDWordPtr = ^SDWord;
+       DWordPtr = ^DWord;
+
+       { Logical data types }
+       BooleanPtr = ^Boolean;
+
+       CharPtr = ^Char;
+       UCharPtr = ^UChar;
+       ShortPtr = ^Short;
+       UShortPtr = ^UShort;
+       IntPtr = ^Int;
+       UIntPtr = ^UInt;
+       LongPtr = ^Long;
+       ULongPtr = ^ULong;
+
+       { Generic Pointer types used by Memory Manager }
+       { We have to define Ptr as char* because that's what the Mac includes do. }
+       { global pointer }
+       Ptr = ^char;
+
+       { global handle }
+       Handle = ^Ptr;
+
+       { Function types }
+       ProcPtr = function : Long;cdecl;
+  $Log: common.inc,v $
+  Revision 1.4  2005/02/14 17:13:31  peter
+    * truncate log
+
+}
diff --git a/rtl/palmos/api/common.pp b/rtl/palmos/api/common.pp
new file mode 100644
index 0000000000..839e9ece6d
--- /dev/null
+++ b/rtl/palmos/api/common.pp
@@ -0,0 +1,31 @@
+{
+    $Id: common.pp,v 1.4 2005/02/14 17:13:31 peter Exp $
+    This file is part of the Free Pascal run time library.
+
+    Copyright (c) 1998 Florian Klaempfl
+    member of the Free Pascal development team
+
+    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 common;
+
+  interface
+
+  {$I common.inc}
+
+  implementation
+
+end.
+{
+  $Log: common.pp,v $
+  Revision 1.4  2005/02/14 17:13:31  peter
+    * truncate log
+
+}
diff --git a/rtl/palmos/api/font.imn b/rtl/palmos/api/font.imn
new file mode 100644
index 0000000000..04a3e081ec
--- /dev/null
+++ b/rtl/palmos/api/font.imn
@@ -0,0 +1,5 @@
+  function FntIsAppDefined(fnt : FontID) : boolean;
+
+    begin
+       FntIsAppDefined:=longint(fnt)>=longint(fntAppFontCustomBase);
+    end;
diff --git a/rtl/palmos/api/font.inc b/rtl/palmos/api/font.inc
new file mode 100644
index 0000000000..60f7c58274
--- /dev/null
+++ b/rtl/palmos/api/font.inc
@@ -0,0 +1,57 @@
+  type
+     FontCharInfoType = record
+          offset : SByte;
+          width : SByte;
+       end;
+
+     FontType = record
+          fontType : SWord;
+          firstChar : SWord;
+          lastChar : SWord;
+          maxWidth : SWord;
+          kernMax : SWord;
+          nDescent : SWord;
+          fRectWidth : SWord;
+          fRectHeight : SWord;
+          owTLoc : SWord;
+          ascent : SWord;
+          descent : SWord;
+          leading : SWord;
+          rowWords : SWord;
+       end;
+
+     FontPtr = ^FontType;
+
+     FontTablePtr = ^FontPtr;
+
+     fontID = (stdFont := $00,boldFont,largeFont,symbolFont,
+       symbol11Font,symbol7Font,ledFont,largeBoldFont,
+       fntAppFontCustomBase := $80);
+
+  const
+     checkboxFont = symbol11Font;
+
+  function FntIsAppDefined(fnt : FontID) : boolean;
+
+  function FntGetFont:FontID;systrap sysTrapFntGetFont;
+  function FntSetFont(font:FontID):FontID;systrap sysTrapFntSetFont;
+  function FntGetFontPtr:FontPtr;systrap sysTrapFntGetFontPtr;
+  function FntBaseLine:SWord;systrap sysTrapFntBaseLine;
+  function FntCharHeight:SWord;systrap sysTrapFntCharHeight;
+  function FntLineHeight:SWord;systrap sysTrapFntLineHeight;
+  function FntAverageCharWidth:SWord;systrap sysTrapFntAverageCharWidth;
+  function FntCharWidth(ch:Char):SWord;systrap sysTrapFntCharWidth;
+  function FntCharsWidth(chars:pChar; len:Word):SWord;systrap sysTrapFntCharsWidth;
+  procedure FntCharsInWidth(string:pChar; stringWidthP:pSWord; stringLengthP:pSWord; fitWithinWidth:pBoolean);systrap sysTrapFntCharsInWidth;
+  function FntDescenderHeight:SWord;systrap sysTrapFntDescenderHeight;
+  function FntLineWidth(pChars:pChar; length:Word):SWord;systrap sysTrapFntLineWidth;
+  function FntWordWrap(chars:pChar; maxWidth:Word):Word;systrap sysTrapFntWordWrap;
+  procedure FntWordWrapReverseNLines(chars:pChar; maxWidth:Word; linesToScrollP:WordPtr; scrollPosP:WordPtr);systrap sysTrapFntWordWrapReverseNLines;
+  procedure FntGetScrollValues(chars:pChar; width:Word; scrollPos:Word; linesP:WordPtr; topLine:WordPtr);systrap sysTrapFntGetScrollValues;
+  function FntDefineFont(font:FontID; fontP:FontPtr):Err;systrap sysTrapFntDefineFont;
+
+  $Log: font.inc,v $
+  Revision 1.4  2005/02/14 17:13:31  peter
+    * truncate log
+
+}
diff --git a/rtl/palmos/api/fontsel.inc b/rtl/palmos/api/fontsel.inc
new file mode 100644
index 0000000000..b7afe9b61c
--- /dev/null
+++ b/rtl/palmos/api/fontsel.inc
@@ -0,0 +1,6 @@
+  function FontSelect(fontID:FontID):FontID;systrap sysTrapFontSelect;
+  $Log: fontsel.inc,v $
+  Revision 1.4  2005/02/14 17:13:31  peter
+    * truncate log
+
+}
diff --git a/rtl/palmos/api/init.inc b/rtl/palmos/api/init.inc
new file mode 100644
index 0000000000..9fb91a39d7
--- /dev/null
+++ b/rtl/palmos/api/init.inc
@@ -0,0 +1,7 @@
+  procedure UIInitialize;systrap sysTrapUIInitialize;
+  procedure UIReset;systrap sysTrapUIReset;
+  $Log: init.inc,v $
+  Revision 1.4  2005/02/14 17:13:31  peter
+    * truncate log
+
+}
diff --git a/rtl/palmos/api/readme b/rtl/palmos/api/readme
new file mode 100644
index 0000000000..4a077b72dc
--- /dev/null
+++ b/rtl/palmos/api/readme
@@ -0,0 +1,6 @@
+This directory contains the interface units for the PalmOS.
+
+Renaming scheme (because of the 8.3 DOS limitation):
+---------------------------------------------------
+systemmgr  --> sysmgr
+fontselect --> fontsel
diff --git a/rtl/palmos/api/rect.inc b/rtl/palmos/api/rect.inc
new file mode 100644
index 0000000000..8a1eea9bf5
--- /dev/null
+++ b/rtl/palmos/api/rect.inc
@@ -0,0 +1,32 @@
+  type
+     AbsRectType = record
+          left : SWord;
+          top : SWord;
+          right : SWord;
+          bottom : SWord;
+       end;
+
+     PointType = record
+          x : SWord;
+          y : SWord;
+       end;
+
+     RectangleType = record
+          topLeft : PointType;
+          extent : PointType;
+       end;
+
+     RectanglePtr = ^RectangleType;
+
+  procedure RctSetRectangle(r:RectanglePtr; left:SWord; top:SWord; width:SWord; height:SWord);systrap sysTrapRctSetRectangle;
+  procedure RctCopyRectangle(srcRect:RectanglePtr; dstRect:RectanglePtr);systrap sysTrapRctCopyRectangle;
+  procedure RctInsetRectangle(r:RectanglePtr; insetAmt:SWord);systrap sysTrapRctInsetRectangle;
+  procedure RctOffsetRectangle(r:RectanglePtr; deltaX:SWord; deltaY:SWord);systrap sysTrapRctOffsetRectangle;
+  function RctPtInRectangle(x:SWord; y:SWord; r:RectanglePtr):Boolean;systrap sysTrapRctPtInRectangle;
+  procedure RctGetIntersection(r1:RectanglePtr; r2:RectanglePtr; r3:RectanglePtr);systrap sysTrapRctGetIntersection;
+
+  $Log: rect.inc,v $
+  Revision 1.4  2005/02/14 17:13:31  peter
+    * truncate log
+
+}
diff --git a/rtl/palmos/api/sysall.pp b/rtl/palmos/api/sysall.pp
new file mode 100644
index 0000000000..c4bbb3c400
--- /dev/null
+++ b/rtl/palmos/api/sysall.pp
@@ -0,0 +1,37 @@
+{
+    $Id: sysall.pp,v 1.4 2005/02/14 17:13:31 peter Exp $
+    This file is part of the Free Pascal run time library.
+
+    Copyright (c) 1998 Florian Klaempfl
+    member of the Free Pascal development team
+
+    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 sysall;
+
+  interface
+
+  { include common definitions }
+  {$I common.inc}
+
+  { include trap number definitions }
+  {$I systraps.inc}
+
+  {$I sysmgr.inc}
+
+  implementation
+
+end.
+{
+  $Log: sysall.pp,v $
+  Revision 1.4  2005/02/14 17:13:31  peter
+    * truncate log
+
+}
diff --git a/rtl/palmos/api/systraps.inc b/rtl/palmos/api/systraps.inc
new file mode 100644
index 0000000000..8509bab971
--- /dev/null
+++ b/rtl/palmos/api/systraps.inc
@@ -0,0 +1,482 @@
+{
+Copyright © 1995 - 1998, 3Com Corporation or its subsidiaries ("3Com").
+All rights reserved.
+
+This software may be copied and used solely for developing products for
+the Palm Computing platform and for archival and backup purposes.  Except
+for the foregoing, no part of this software may be reproduced or transmitted
+in any form or by any means or used to make any derivative work (such as
+translation, transformation or adaptation) without express written consent
+from 3Com.
+
+3Com reserves the right to revise this software and to make changes in content
+from time to time without obligation on the part of 3Com to provide notification
+of such revision or changes.
+3COM MAKES NO REPRESENTATIONS OR WARRANTIES THAT THE SOFTWARE IS FREE OF ERRORS
+OR THAT THE SOFTWARE IS SUITABLE FOR YOUR USE.  THE SOFTWARE IS PROVIDED ON AN
+"AS IS" BASIS.  3COM MAKES NO WARRANTIES, TERMS OR CONDITIONS, EXPRESS OR IMPLIED,
+EITHER IN FACT OR BY OPERATION OF LAW, STATUTORY OR OTHERWISE, INCLUDING WARRANTIES,
+TERMS, OR CONDITIONS OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, AND
+SATISFACTORY QUALITY.
+
+TO THE FULL EXTENT ALLOWED BY LAW, 3COM ALSO EXCLUDES FOR ITSELF AND ITS SUPPLIERS
+ANY LIABILITY, WHETHER BASED IN CONTRACT OR TORT (INCLUDING NEGLIGENCE), FOR
+DIRECT, INCIDENTAL, CONSEQUENTIAL, INDIRECT, SPECIAL, OR PUNITIVE DAMAGES OF
+ANY KIND, OR FOR LOSS OF REVENUE OR PROFITS, LOSS OF BUSINESS, LOSS OF INFORMATION
+OR DATA, OR OTHER FINANCIAL LOSS ARISING OUT OF OR IN CONNECTION WITH THIS SOFTWARE,
+EVEN IF 3COM HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
+
+3Com, HotSync, Palm Computing, and Graffiti are registered trademarks, and
+Palm III and Palm OS are trademarks of 3Com Corporation or its subsidiaries.
+
+IF THIS SOFTWARE IS PROVIDED ON A COMPACT DISK, THE OTHER SOFTWARE AND
+DOCUMENTATION ON THE COMPACT DISK ARE SUBJECT TO THE LICENSE AGREEMENT
+ACCOMPANYING THE COMPACT DISK.
+
+ -------------------------------------------------------------------
+  FileName:
+             SysTraps.inc
+
+  Description:
+             Pilot Traps
+
+  History:
+             6/13/95    RM      - Created by Ron Marianetti
+             8/05/98    converted to pascal by Florian Klaempfl
+}
+  const
+     sysTrapBase = $A000;
+
+  type
+     SysTrapNumber = (sysTrapMemInit := sysTrapBase,sysTrapMemInitHeapTable,
+       sysTrapMemStoreInit,sysTrapMemCardFormat,
+       sysTrapMemCardInfo,sysTrapMemStoreInfo,
+       sysTrapMemStoreSetInfo,sysTrapMemNumHeaps,
+       sysTrapMemNumRAMHeaps,sysTrapMemHeapID,
+       sysTrapMemHeapPtr,sysTrapMemHeapFreeBytes,
+       sysTrapMemHeapSize,sysTrapMemHeapFlags,
+       sysTrapMemHeapCompact,sysTrapMemHeapInit,
+       sysTrapMemHeapFreeByOwnerID,sysTrapMemChunkNew,
+       sysTrapMemChunkFree,sysTrapMemPtrNew,
+       sysTrapMemPtrRecoverHandle,sysTrapMemPtrFlags,
+       sysTrapMemPtrSize,sysTrapMemPtrOwner,
+       sysTrapMemPtrHeapID,sysTrapMemPtrCardNo,
+       sysTrapMemPtrToLocalID,sysTrapMemPtrSetOwner,
+       sysTrapMemPtrResize,sysTrapMemPtrResetLock,
+       sysTrapMemHandleNew,sysTrapMemHandleLockCount,
+       sysTrapMemHandleToLocalID,sysTrapMemHandleLock,
+       sysTrapMemHandleUnlock,sysTrapMemLocalIDToGlobal,
+       sysTrapMemLocalIDKind,sysTrapMemLocalIDToPtr,
+       sysTrapMemMove,sysTrapMemSet,sysTrapMemStoreSearch,
+       sysTrapMemPtrDataStorage,sysTrapMemKernelInit,
+       sysTrapMemHandleFree,sysTrapMemHandleFlags,
+       sysTrapMemHandleSize,sysTrapMemHandleOwner,
+       sysTrapMemHandleHeapID,sysTrapMemHandleDataStorage,
+       sysTrapMemHandleCardNo,sysTrapMemHandleSetOwner,
+       sysTrapMemHandleResize,sysTrapMemHandleResetLock,
+       sysTrapMemPtrUnlock,sysTrapMemLocalIDToLockedPtr,
+       sysTrapMemSetDebugMode,sysTrapMemHeapScramble,
+       sysTrapMemHeapCheck,sysTrapMemNumCards,
+       sysTrapMemDebugMode,sysTrapMemSemaphoreReserve,
+       sysTrapMemSemaphoreRelease,sysTrapMemHeapDynamic,
+       sysTrapMemNVParams,sysTrapDmInit,sysTrapDmCreateDatabase,
+       sysTrapDmDeleteDatabase,sysTrapDmNumDatabases,
+       sysTrapDmGetDatabase,sysTrapDmFindDatabase,
+       sysTrapDmDatabaseInfo,sysTrapDmSetDatabaseInfo,
+       sysTrapDmDatabaseSize,sysTrapDmOpenDatabase,
+       sysTrapDmCloseDatabase,sysTrapDmNextOpenDatabase,
+       sysTrapDmOpenDatabaseInfo,sysTrapDmResetRecordStates,
+       sysTrapDmGetLastErr,sysTrapDmNumRecords,
+       sysTrapDmRecordInfo,sysTrapDmSetRecordInfo,
+       sysTrapDmAttachRecord,sysTrapDmDetachRecord,
+       sysTrapDmMoveRecord,sysTrapDmNewRecord,
+       sysTrapDmRemoveRecord,sysTrapDmDeleteRecord,
+       sysTrapDmArchiveRecord,sysTrapDmNewHandle,
+       sysTrapDmRemoveSecretRecords,sysTrapDmQueryRecord,
+       sysTrapDmGetRecord,sysTrapDmResizeRecord,
+       sysTrapDmReleaseRecord,sysTrapDmGetResource,
+       sysTrapDmGet1Resource,sysTrapDmReleaseResource,
+       sysTrapDmResizeResource,sysTrapDmNextOpenResDatabase,
+       sysTrapDmFindResourceType,sysTrapDmFindResource,
+       sysTrapDmSearchResource,sysTrapDmNumResources,
+       sysTrapDmResourceInfo,sysTrapDmSetResourceInfo,
+       sysTrapDmAttachResource,sysTrapDmDetachResource,
+       sysTrapDmNewResource,sysTrapDmRemoveResource,
+       sysTrapDmGetResourceIndex,sysTrapDmQuickSort,
+       sysTrapDmQueryNextInCategory,sysTrapDmNumRecordsInCategory,
+       sysTrapDmPositionInCategory,sysTrapDmSeekRecordInCategory,
+       sysTrapDmMoveCategory,sysTrapDmOpenDatabaseByTypeCreator,
+       sysTrapDmWrite,sysTrapDmStrCopy,sysTrapDmGetNextDatabaseByTypeCreator,
+       sysTrapDmWriteCheck,sysTrapDmMoveOpenDBContext,
+       sysTrapDmFindRecordByID,sysTrapDmGetAppInfoID,
+       sysTrapDmFindSortPositionV10,sysTrapDmSet,
+       sysTrapDmCreateDatabaseFromImage,sysTrapDbgSrcMessage,
+       sysTrapDbgMessage,sysTrapDbgGetMessage,
+       sysTrapDbgCommSettings,sysTrapErrDisplayFileLineMsg,
+       sysTrapErrSetJump,sysTrapErrLongJump,
+       sysTrapErrThrow,sysTrapErrExceptionList,
+       sysTrapSysBroadcastActionCode,sysTrapSysUnimplemented,
+       sysTrapSysColdBoot,sysTrapSysReset,sysTrapSysDoze,
+       sysTrapSysAppLaunch,sysTrapSysAppStartup,
+       sysTrapSysAppExit,sysTrapSysSetA5,sysTrapSysSetTrapAddress,
+       sysTrapSysGetTrapAddress,sysTrapSysTranslateKernelErr,
+       sysTrapSysSemaphoreCreate,sysTrapSysSemaphoreDelete,
+       sysTrapSysSemaphoreWait,sysTrapSysSemaphoreSignal,
+       sysTrapSysTimerCreate,sysTrapSysTimerWrite,
+       sysTrapSysTaskCreate,sysTrapSysTaskDelete,
+       sysTrapSysTaskTrigger,sysTrapSysTaskID,
+       sysTrapSysTaskUserInfoPtr,sysTrapSysTaskDelay,
+       sysTrapSysTaskSetTermProc,sysTrapSysUILaunch,
+       sysTrapSysNewOwnerID,sysTrapSysSemaphoreSet,
+       sysTrapSysDisableInts,sysTrapSysRestoreStatus,
+       sysTrapSysUIAppSwitch,sysTrapSysCurAppInfoPV20,
+       sysTrapSysHandleEvent,sysTrapSysInit,
+       sysTrapSysQSort,sysTrapSysCurAppDatabase,
+       sysTrapSysFatalAlert,sysTrapSysResSemaphoreCreate,
+       sysTrapSysResSemaphoreDelete,sysTrapSysResSemaphoreReserve,
+       sysTrapSysResSemaphoreRelease,sysTrapSysSleep,
+       sysTrapSysKeyboardDialogV10,sysTrapSysAppLauncherDialog,
+       sysTrapSysSetPerformance,sysTrapSysBatteryInfoV20,
+       sysTrapSysLibInstall,sysTrapSysLibRemove,
+       sysTrapSysLibTblEntry,sysTrapSysLibFind,
+       sysTrapSysBatteryDialog,sysTrapSysCopyStringResource,
+       sysTrapSysKernelInfo,sysTrapSysLaunchConsole,
+       sysTrapSysTimerDelete,sysTrapSysSetAutoOffTime,
+       sysTrapSysFormPointerArrayToStrings,
+       sysTrapSysRandom,sysTrapSysTaskSwitching,
+       sysTrapSysTimerRead,sysTrapStrCopy,sysTrapStrCat,
+       sysTrapStrLen,sysTrapStrCompare,sysTrapStrIToA,
+       sysTrapStrCaselessCompare,sysTrapStrIToH,
+       sysTrapStrChr,sysTrapStrStr,sysTrapStrAToI,
+       sysTrapStrToLower,sysTrapSerReceiveISP,
+       sysTrapSlkOpen,sysTrapSlkClose,sysTrapSlkOpenSocket,
+       sysTrapSlkCloseSocket,sysTrapSlkSocketRefNum,
+       sysTrapSlkSocketSetTimeout,sysTrapSlkFlushSocket,
+       sysTrapSlkSetSocketListener,sysTrapSlkSendPacket,
+       sysTrapSlkReceivePacket,sysTrapSlkSysPktDefaultResponse,
+       sysTrapSlkProcessRPC,sysTrapConPutS,
+       sysTrapConGetS,sysTrapFplInit,sysTrapFplFree,
+       sysTrapFplFToA,sysTrapFplAToF,sysTrapFplBase10Info,
+       sysTrapFplLongToFloat,sysTrapFplFloatToLong,
+       sysTrapFplFloatToULong,sysTrapFplMul,
+       sysTrapFplAdd,sysTrapFplSub,sysTrapFplDiv,
+       sysTrapScrInit,sysTrapScrCopyRectangle,
+       sysTrapScrDrawChars,sysTrapScrLineRoutine,
+       sysTrapScrRectangleRoutine,sysTrapScrScreenInfo,
+       sysTrapScrDrawNotify,sysTrapScrSendUpdateArea,
+       sysTrapScrCompressScanLine,sysTrapScrDeCompressScanLine,
+       sysTrapTimGetSeconds,sysTrapTimSetSeconds,
+       sysTrapTimGetTicks,sysTrapTimInit,sysTrapTimSetAlarm,
+       sysTrapTimGetAlarm,sysTrapTimHandleInterrupt,
+       sysTrapTimSecondsToDateTime,sysTrapTimDateTimeToSeconds,
+       sysTrapTimAdjust,sysTrapTimSleep,sysTrapTimWake,
+       sysTrapCategoryCreateListV10,sysTrapCategoryFreeListV10,
+       sysTrapCategoryFind,sysTrapCategoryGetName,
+       sysTrapCategoryEditV10,sysTrapCategorySelectV10,
+       sysTrapCategoryGetNext,sysTrapCategorySetTriggerLabel,
+       sysTrapCategoryTruncateName,sysTrapClipboardAddItem,
+       sysTrapClipboardCheckIfItemExist,sysTrapClipboardGetItem,
+       sysTrapCtlDrawControl,sysTrapCtlEraseControl,
+       sysTrapCtlHideControl,sysTrapCtlShowControl,
+       sysTrapCtlGetValue,sysTrapCtlSetValue,
+       sysTrapCtlGetLabel,sysTrapCtlSetLabel,
+       sysTrapCtlHandleEvent,sysTrapCtlHitControl,
+       sysTrapCtlSetEnabled,sysTrapCtlSetUsable,
+       sysTrapCtlEnabled,sysTrapEvtInitialize,
+       sysTrapEvtAddEventToQueue,sysTrapEvtCopyEvent,
+       sysTrapEvtGetEvent,sysTrapEvtGetPen,
+       sysTrapEvtSysInit,sysTrapEvtGetSysEvent,
+       sysTrapEvtProcessSoftKeyStroke,sysTrapEvtGetPenBtnList,
+       sysTrapEvtSetPenQueuePtr,sysTrapEvtPenQueueSize,
+       sysTrapEvtFlushPenQueue,sysTrapEvtEnqueuePenPoint,
+       sysTrapEvtDequeuePenStrokeInfo,sysTrapEvtDequeuePenPoint,
+       sysTrapEvtFlushNextPenStroke,sysTrapEvtSetKeyQueuePtr,
+       sysTrapEvtKeyQueueSize,sysTrapEvtFlushKeyQueue,
+       sysTrapEvtEnqueueKey,sysTrapEvtDequeueKeyEvent,
+       sysTrapEvtWakeup,sysTrapEvtResetAutoOffTimer,
+       sysTrapEvtKeyQueueEmpty,sysTrapEvtEnableGraffiti,
+       sysTrapFldCopy,sysTrapFldCut,sysTrapFldDrawField,
+       sysTrapFldEraseField,sysTrapFldFreeMemory,
+       sysTrapFldGetBounds,sysTrapFldGetTextPtr,
+       sysTrapFldGetSelection,sysTrapFldHandleEvent,
+       sysTrapFldPaste,sysTrapFldRecalculateField,
+       sysTrapFldSetBounds,sysTrapFldSetText,
+       sysTrapFldGetFont,sysTrapFldSetFont,
+       sysTrapFldSetSelection,sysTrapFldGrabFocus,
+       sysTrapFldReleaseFocus,sysTrapFldGetInsPtPosition,
+       sysTrapFldSetInsPtPosition,sysTrapFldSetScrollPosition,
+       sysTrapFldGetScrollPosition,sysTrapFldGetTextHeight,
+       sysTrapFldGetTextAllocatedSize,sysTrapFldGetTextLength,
+       sysTrapFldScrollField,sysTrapFldScrollable,
+       sysTrapFldGetVisibleLines,sysTrapFldGetAttributes,
+       sysTrapFldSetAttributes,sysTrapFldSendChangeNotification,
+       sysTrapFldCalcFieldHeight,sysTrapFldGetTextHandle,
+       sysTrapFldCompactText,sysTrapFldDirty,
+       sysTrapFldWordWrap,sysTrapFldSetTextAllocatedSize,
+       sysTrapFldSetTextHandle,sysTrapFldSetTextPtr,
+       sysTrapFldGetMaxChars,sysTrapFldSetMaxChars,
+       sysTrapFldSetUsable,sysTrapFldInsert,
+       sysTrapFldDelete,sysTrapFldUndo,sysTrapFldSetDirty,
+       sysTrapFldSendHeightChangeNotification,
+       sysTrapFldMakeFullyVisible,sysTrapFntGetFont,
+       sysTrapFntSetFont,sysTrapFntGetFontPtr,
+       sysTrapFntBaseLine,sysTrapFntCharHeight,
+       sysTrapFntLineHeight,sysTrapFntAverageCharWidth,
+       sysTrapFntCharWidth,sysTrapFntCharsWidth,
+       sysTrapFntDescenderHeight,sysTrapFntCharsInWidth,
+       sysTrapFntLineWidth,sysTrapFrmInitForm,
+       sysTrapFrmDeleteForm,sysTrapFrmDrawForm,
+       sysTrapFrmEraseForm,sysTrapFrmGetActiveForm,
+       sysTrapFrmSetActiveForm,sysTrapFrmGetActiveFormID,
+       sysTrapFrmGetUserModifiedState,sysTrapFrmSetNotUserModified,
+       sysTrapFrmGetFocus,sysTrapFrmSetFocus,
+       sysTrapFrmHandleEvent,sysTrapFrmGetFormBounds,
+       sysTrapFrmGetWindowHandle,sysTrapFrmGetFormId,
+       sysTrapFrmGetFormPtr,sysTrapFrmGetNumberOfObjects,
+       sysTrapFrmGetObjectIndex,sysTrapFrmGetObjectId,
+       sysTrapFrmGetObjectType,sysTrapFrmGetObjectPtr,
+       sysTrapFrmHideObject,sysTrapFrmShowObject,
+       sysTrapFrmGetObjectPosition,sysTrapFrmSetObjectPosition,
+       sysTrapFrmGetControlValue,sysTrapFrmSetControlValue,
+       sysTrapFrmGetControlGroupSelection,
+       sysTrapFrmSetControlGroupSelection,
+       sysTrapFrmCopyLabel,sysTrapFrmSetLabel,
+       sysTrapFrmGetLabel,sysTrapFrmSetCategoryLabel,
+       sysTrapFrmGetTitle,sysTrapFrmSetTitle,
+       sysTrapFrmAlert,sysTrapFrmDoDialog,sysTrapFrmCustomAlert,
+       sysTrapFrmHelp,sysTrapFrmUpdateScrollers,
+       sysTrapFrmGetFirstForm,sysTrapFrmVisible,
+       sysTrapFrmGetObjectBounds,sysTrapFrmCopyTitle,
+       sysTrapFrmGotoForm,sysTrapFrmPopupForm,
+       sysTrapFrmUpdateForm,sysTrapFrmReturnToForm,
+       sysTrapFrmSetEventHandler,sysTrapFrmDispatchEvent,
+       sysTrapFrmCloseAllForms,sysTrapFrmSaveAllForms,
+       sysTrapFrmGetGadgetData,sysTrapFrmSetGadgetData,
+       sysTrapFrmSetCategoryTrigger,sysTrapUIInitialize,
+       sysTrapUIReset,sysTrapInsPtInitialize,
+       sysTrapInsPtSetLocation,sysTrapInsPtGetLocation,
+       sysTrapInsPtEnable,sysTrapInsPtEnabled,
+       sysTrapInsPtSetHeight,sysTrapInsPtGetHeight,
+       sysTrapInsPtCheckBlink,sysTrapLstSetDrawFunction,
+       sysTrapLstDrawList,sysTrapLstEraseList,
+       sysTrapLstGetSelection,sysTrapLstGetSelectionText,
+       sysTrapLstHandleEvent,sysTrapLstSetHeight,
+       sysTrapLstSetSelection,sysTrapLstSetListChoices,
+       sysTrapLstMakeItemVisible,sysTrapLstGetNumberOfItems,
+       sysTrapLstPopupList,sysTrapLstSetPosition,
+       sysTrapMenuInit,sysTrapMenuDispose,sysTrapMenuHandleEvent,
+       sysTrapMenuDrawMenu,sysTrapMenuEraseStatus,
+       sysTrapMenuGetActiveMenu,sysTrapMenuSetActiveMenu,
+       sysTrapRctSetRectangle,sysTrapRctCopyRectangle,
+       sysTrapRctInsetRectangle,sysTrapRctOffsetRectangle,
+       sysTrapRctPtInRectangle,sysTrapRctGetIntersection,
+       sysTrapTblDrawTable,sysTrapTblEraseTable,
+       sysTrapTblHandleEvent,sysTrapTblGetItemBounds,
+       sysTrapTblSelectItem,sysTrapTblGetItemInt,
+       sysTrapTblSetItemInt,sysTrapTblSetItemStyle,
+       sysTrapTblUnhighlightSelection,sysTrapTblSetRowUsable,
+       sysTrapTblGetNumberOfRows,sysTrapTblSetCustomDrawProcedure,
+       sysTrapTblSetRowSelectable,sysTrapTblRowSelectable,
+       sysTrapTblSetLoadDataProcedure,sysTrapTblSetSaveDataProcedure,
+       sysTrapTblGetBounds,sysTrapTblSetRowHeight,
+       sysTrapTblGetColumnWidth,sysTrapTblGetRowID,
+       sysTrapTblSetRowID,sysTrapTblMarkRowInvalid,
+       sysTrapTblMarkTableInvalid,sysTrapTblGetSelection,
+       sysTrapTblInsertRow,sysTrapTblRemoveRow,
+       sysTrapTblRowInvalid,sysTrapTblRedrawTable,
+       sysTrapTblRowUsable,sysTrapTblReleaseFocus,
+       sysTrapTblEditing,sysTrapTblGetCurrentField,
+       sysTrapTblSetColumnUsable,sysTrapTblGetRowHeight,
+       sysTrapTblSetColumnWidth,sysTrapTblGrabFocus,
+       sysTrapTblSetItemPtr,sysTrapTblFindRowID,
+       sysTrapTblGetLastUsableRow,sysTrapTblGetColumnSpacing,
+       sysTrapTblFindRowData,sysTrapTblGetRowData,
+       sysTrapTblSetRowData,sysTrapTblSetColumnSpacing,
+       sysTrapWinCreateWindow,sysTrapWinCreateOffscreenWindow,
+       sysTrapWinDeleteWindow,sysTrapWinInitializeWindow,
+       sysTrapWinAddWindow,sysTrapWinRemoveWindow,
+       sysTrapWinSetActiveWindow,sysTrapWinSetDrawWindow,
+       sysTrapWinGetDrawWindow,sysTrapWinGetActiveWindow,
+       sysTrapWinGetDisplayWindow,sysTrapWinGetFirstWindow,
+       sysTrapWinEnableWindow,sysTrapWinDisableWindow,
+       sysTrapWinGetWindowFrameRect,sysTrapWinDrawWindowFrame,
+       sysTrapWinEraseWindow,sysTrapWinSaveBits,
+       sysTrapWinRestoreBits,sysTrapWinCopyRectangle,
+       sysTrapWinScrollRectangle,sysTrapWinGetDisplayExtent,
+       sysTrapWinGetWindowExtent,sysTrapWinDisplayToWindowPt,
+       sysTrapWinWindowToDisplayPt,sysTrapWinGetClip,
+       sysTrapWinSetClip,sysTrapWinResetClip,
+       sysTrapWinClipRectangle,sysTrapWinDrawLine,
+       sysTrapWinDrawGrayLine,sysTrapWinEraseLine,
+       sysTrapWinInvertLine,sysTrapWinFillLine,
+       sysTrapWinDrawRectangle,sysTrapWinEraseRectangle,
+       sysTrapWinInvertRectangle,sysTrapWinDrawRectangleFrame,
+       sysTrapWinDrawGrayRectangleFrame,sysTrapWinEraseRectangleFrame,
+       sysTrapWinInvertRectangleFrame,sysTrapWinGetFramesRectangle,
+       sysTrapWinDrawChars,sysTrapWinEraseChars,
+       sysTrapWinInvertChars,sysTrapWinGetPattern,
+       sysTrapWinSetPattern,sysTrapWinSetUnderlineMode,
+       sysTrapWinDrawBitmap,sysTrapWinModal,
+       sysTrapWinGetWindowBounds,sysTrapWinFillRectangle,
+       sysTrapWinDrawInvertedChars,sysTrapPrefOpenPreferenceDBV10,
+       sysTrapPrefGetPreferences,sysTrapPrefSetPreferences,
+       sysTrapPrefGetAppPreferencesV10,sysTrapPrefSetAppPreferencesV10,
+       sysTrapSndInit,sysTrapSndSetDefaultVolume,
+       sysTrapSndGetDefaultVolume,sysTrapSndDoCmd,
+       sysTrapSndPlaySystemSound,sysTrapAlmInit,
+       sysTrapAlmCancelAll,sysTrapAlmAlarmCallback,
+       sysTrapAlmSetAlarm,sysTrapAlmGetAlarm,
+       sysTrapAlmDisplayAlarm,sysTrapAlmEnableNotification,
+       sysTrapHwrGetRAMMapping,sysTrapHwrMemWritable,
+       sysTrapHwrMemReadable,sysTrapHwrDoze,
+       sysTrapHwrSleep,sysTrapHwrWake,sysTrapHwrSetSystemClock,
+       sysTrapHwrSetCPUDutyCycle,sysTrapHwrLCDInit,
+       sysTrapHwrLCDSleep,sysTrapHwrTimerInit,
+       sysTrapHwrCursor,sysTrapHwrBatteryLevel,
+       sysTrapHwrDelay,sysTrapHwrEnableDataWrites,
+       sysTrapHwrDisableDataWrites,sysTrapHwrLCDBaseAddr,
+       sysTrapHwrLCDDrawBitmap,sysTrapHwrTimerSleep,
+       sysTrapHwrTimerWake,sysTrapHwrLCDWake,
+       sysTrapHwrIRQ1Handler,sysTrapHwrIRQ2Handler,
+       sysTrapHwrIRQ3Handler,sysTrapHwrIRQ4Handler,
+       sysTrapHwrIRQ5Handler,sysTrapHwrIRQ6Handler,
+       sysTrapHwrDockSignals,sysTrapHwrPluggedIn,
+       sysTrapCrc16CalcBlock,sysTrapSelectDayV10,
+       sysTrapSelectTime,sysTrapDayDrawDaySelector,
+       sysTrapDayHandleEvent,sysTrapDayDrawDays,
+       sysTrapDayOfWeek,sysTrapDaysInMonth,
+       sysTrapDayOfMonth,sysTrapDateDaysToDate,
+       sysTrapDateToDays,sysTrapDateAdjust,
+       sysTrapDateSecondsToDate,sysTrapDateToAscii,
+       sysTrapDateToDOWDMFormat,sysTrapTimeToAscii,
+       sysTrapFind,sysTrapFindStrInStr,sysTrapFindSaveMatch,
+       sysTrapFindGetLineBounds,sysTrapFindDrawHeader,
+       sysTrapPenOpen,sysTrapPenClose,sysTrapPenGetRawPen,
+       sysTrapPenCalibrate,sysTrapPenRawToScreen,
+       sysTrapPenScreenToRaw,sysTrapPenResetCalibration,
+       sysTrapPenSleep,sysTrapPenWake,sysTrapResLoadForm,
+       sysTrapResLoadMenu,sysTrapFtrInit,sysTrapFtrUnregister,
+       sysTrapFtrGet,sysTrapFtrSet,sysTrapFtrGetByIndex,
+       sysTrapGrfInit,sysTrapGrfFree,sysTrapGrfGetState,
+       sysTrapGrfSetState,sysTrapGrfFlushPoints,
+       sysTrapGrfAddPoint,sysTrapGrfInitState,
+       sysTrapGrfCleanState,sysTrapGrfMatch,
+       sysTrapGrfGetMacro,sysTrapGrfFilterPoints,
+       sysTrapGrfGetNumPoints,sysTrapGrfGetPoint,
+       sysTrapGrfFindBranch,sysTrapGrfMatchGlyph,
+       sysTrapGrfGetGlyphMapping,sysTrapGrfGetMacroName,
+       sysTrapGrfDeleteMacro,sysTrapGrfAddMacro,
+       sysTrapGrfGetAndExpandMacro,sysTrapGrfProcessStroke,
+       sysTrapGrfFieldChange,sysTrapGetCharSortValue,
+       sysTrapGetCharAttr,sysTrapGetCharCaselessValue,
+       sysTrapPwdExists,sysTrapPwdVerify,sysTrapPwdSet,
+       sysTrapPwdRemove,sysTrapGsiInitialize,
+       sysTrapGsiSetLocation,sysTrapGsiEnable,
+       sysTrapGsiEnabled,sysTrapGsiSetShiftState,
+       sysTrapKeyInit,sysTrapKeyHandleInterrupt,
+       sysTrapKeyCurrentState,sysTrapKeyResetDoubleTap,
+       sysTrapKeyRates,sysTrapKeySleep,sysTrapKeyWake,
+       sysTrapDlkControl,sysTrapDlkStartServer,
+       sysTrapDlkGetSyncInfo,sysTrapDlkSetLogEntry,
+       sysTrapUnused2,sysTrapSysLibLoad,sysTrapSndPlaySmf,
+       sysTrapSndCreateMidiList,sysTrapAbtShowAbout,
+       sysTrapMdmDial,sysTrapMdmHangUp,sysTrapDmSearchRecord,
+       sysTrapSysInsertionSort,sysTrapDmInsertionSort,
+       sysTrapLstSetTopItem,sysTrapSclSetScrollBar,
+       sysTrapSclDrawScrollBar,sysTrapSclHandleEvent,
+       sysTrapSysMailboxCreate,sysTrapSysMailboxDelete,
+       sysTrapSysMailboxFlush,sysTrapSysMailboxSend,
+       sysTrapSysMailboxWait,sysTrapSysTaskWait,
+       sysTrapSysTaskWake,sysTrapSysTaskWaitClr,
+       sysTrapSysTaskSuspend,sysTrapSysTaskResume,
+       sysTrapCategoryCreateList,sysTrapCategoryFreeList,
+       sysTrapCategoryEditV20,sysTrapCategorySelect,
+       sysTrapDmDeleteCategory,sysTrapSysEvGroupCreate,
+       sysTrapSysEvGroupSignal,sysTrapSysEvGroupRead,
+       sysTrapSysEvGroupWait,sysTrapEvtEventAvail,
+       sysTrapEvtSysEventAvail,sysTrapStrNCopy,
+       sysTrapKeySetMask,sysTrapSelectDay,sysTrapPrefGetPreference,
+       sysTrapPrefSetPreference,sysTrapPrefGetAppPreferences,
+       sysTrapPrefSetAppPreferences,sysTrapFrmPointInTitle,
+       sysTrapStrNCat,sysTrapMemCmp,sysTrapTblSetColumnEditIndicator,
+       sysTrapFntWordWrap,sysTrapFldGetScrollValues,
+       sysTrapSysCreateDataBaseList,sysTrapSysCreatePanelList,
+       sysTrapDlkDispatchRequest,sysTrapStrPrintF,
+       sysTrapStrVPrintF,sysTrapPrefOpenPreferenceDB,
+       sysTrapSysGraffitiReferenceDialog,sysTrapSysKeyboardDialog,
+       sysTrapFntWordWrapReverseNLines,sysTrapFntGetScrollValues,
+       sysTrapTblSetRowStaticHeight,sysTrapTblHasScrollBar,
+       sysTrapSclGetScrollBar,sysTrapFldGetNumberOfBlankLines,
+       sysTrapSysTicksPerSecond,sysTrapHwrBacklight,
+       sysTrapDmDatabaseProtect,sysTrapTblSetBounds,
+       sysTrapStrNCompare,sysTrapStrNCaselessCompare,
+       sysTrapPhoneNumberLookup,sysTrapFrmSetMenu,
+       sysTrapEncDigestMD5,sysTrapDmFindSortPosition,
+       sysTrapSysBinarySearch,sysTrapSysErrString,
+       sysTrapSysStringByIndex,sysTrapEvtAddUniqueEventToQueue,
+       sysTrapStrLocalizeNumber,sysTrapStrDelocalizeNumber,
+       sysTrapLocGetNumberSeparators,sysTrapMenuSetActiveMenuRscID,
+       sysTrapLstScrollList,sysTrapCategoryInitialize,
+       sysTrapEncDigestMD4,sysTrapEncDES,sysTrapLstGetVisibleItems,
+       sysTrapWinSetWindowBounds,sysTrapCategorySetName,
+       sysTrapFldSetInsertionPoint,sysTrapFrmSetObjectBounds,
+       sysTrapWinSetColors,sysTrapFlpDispatch,
+       sysTrapFlpEmDispatch,sysTrapExgInit,
+       sysTrapExgConnect,sysTrapExgPut,sysTrapExgGet,
+       sysTrapExgAccept,sysTrapExgDisconnect,
+       sysTrapExgSend,sysTrapExgReceive,sysTrapExgRegisterData,
+       sysTrapExgNotifyReceive,sysTrapExgControl,
+       sysTrapPrgStartDialog,sysTrapPrgStopDialog,
+       sysTrapPrgUpdateDialog,sysTrapPrgHandleEvent,
+       sysTrapImcReadFieldNoSemicolon,sysTrapImcReadFieldQuotablePrintable,
+       sysTrapImcReadPropertyParameter,sysTrapImcSkipAllPropertyParameters,
+       sysTrapImcReadWhiteSpace,sysTrapImcWriteQuotedPrintable,
+       sysTrapImcWriteNoSemicolon,sysTrapImcStringIsAscii,
+       sysTrapTblGetItemFont,sysTrapTblSetItemFont,
+       sysTrapFontSelect,sysTrapFntDefineFont,
+       sysTrapCategoryEdit,sysTrapSysGetOSVersionString,
+       sysTrapSysBatteryInfo,sysTrapSysUIBusy,
+       sysTrapWinValidateHandle,sysTrapFrmValidatePtr,
+       sysTrapCtlValidatePointer,sysTrapWinMoveWindowAddr,
+       sysTrapFrmAddSpaceForObject,sysTrapFrmNewForm,
+       sysTrapCtlNewControl,sysTrapFldNewField,
+       sysTrapLstNewList,sysTrapFrmNewLabel,
+       sysTrapFrmNewBitmap,sysTrapFrmNewGadget,
+       sysTrapFileOpen,sysTrapFileClose,sysTrapFileDelete,
+       sysTrapFileReadLow,sysTrapFileWrite,
+       sysTrapFileSeek,sysTrapFileTell,sysTrapFileTruncate,
+       sysTrapFileControl,sysTrapFrmActiveState,
+       sysTrapSysGetAppInfo,sysTrapSysGetStackInfo,
+       sysTrapScrDisplayMode,sysTrapHwrLCDGetDepth,
+       sysTrapHwrGetROMToken,sysTrapDbgControl,
+       sysTrapExgDBRead,sysTrapExgDBWrite,sysTrapSysGremlins,
+       sysTrapFrmRemoveObject,sysTrapSysReserved1,
+       sysTrapSysReserved2,sysTrapSysReserved3,
+       sysTrapSysReserved4,sysTrapLastTrapNumber
+       );
+
+  const
+     sysNumTraps = longint(sysTrapLastTrapNumber)-sysTrapBase;
+     sysLibTrapBase = $A800;
+
+  type
+     SysLibTrapNumber = (sysLibTrapName := sysLibTrapBase,sysLibTrapOpen,
+       sysLibTrapClose,sysLibTrapSleep,sysLibTrapWake,
+       sysLibTrapCustom);
+
+  const
+     { Pilot specific TRAP instruction numbers }
+     { For soft breakpoints              }
+     sysDbgBreakpointTrapNum = 0;
+
+     { For compiled breakpoints                  }
+     sysDbgTrapNum = 8;
+
+     { Trap dispatcher }
+     sysDispatchTrapNum = 15;
+
+  $Log: systraps.inc,v $
+  Revision 1.4  2005/02/14 17:13:31  peter
+    * truncate log
+
+}
diff --git a/rtl/palmos/api/systraps.pp b/rtl/palmos/api/systraps.pp
new file mode 100644
index 0000000000..d5d03b3854
--- /dev/null
+++ b/rtl/palmos/api/systraps.pp
@@ -0,0 +1,31 @@
+{
+    $Id: systraps.pp,v 1.4 2005/02/14 17:13:31 peter Exp $
+    This file is part of the Free Pascal run time library.
+
+    Copyright (c) 1998 Florian Klaempfl
+    member of the Free Pascal development team
+
+    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 systraps;
+
+  interface
+
+  {$I systraps.inc}
+
+  implementation
+
+end.
+{
+  $Log: systraps.pp,v $
+  Revision 1.4  2005/02/14 17:13:31  peter
+    * truncate log
+
+}
diff --git a/rtl/palmos/api/ui.pp b/rtl/palmos/api/ui.pp
new file mode 100644
index 0000000000..7b219b6bb1
--- /dev/null
+++ b/rtl/palmos/api/ui.pp
@@ -0,0 +1,36 @@
+{
+    $Id: ui.pp,v 1.4 2005/02/14 17:13:31 peter Exp $
+    This file is part of the Free Pascal run time library.
+
+    Copyright (c) 1998 Florian Klaempfl
+    member of the Free Pascal development team
+
+    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 ui;
+
+  interface
+
+    {$I init.inc}
+    {$I rect.inc}
+    {$I font.inc}
+    {$I fontsel.inc}
+
+  implementation
+
+    {$I font.imn}
+
+end.
+{
+  $Log: ui.pp,v $
+  Revision 1.4  2005/02/14 17:13:31  peter
+    * truncate log
+
+}