paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 11:09:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Moved from OS/2 target

Browse Source
This commit is contained in:
yuri 2003-09-24 09:19:33 +00:00
parent 7fa443b61f
commit ad0e0c3f94
3 changed files with 161 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/emx/emx.imp Normal file
View File

@ -0,0 +1,9 @@
;
; emx.imp
;
_emx_init emx 1 R
_emx_syscall emx 2 R
_emx_16to32 emx 3 1
_emx_32to16 emx 4 1
_emx_thunk1 emx 5 2
_emx_exception emx 6 4

39
rtl/emx/emx.pas Normal file
View File

@ -0,0 +1,39 @@
{****************************************************************************
EMX - Interface unit for the EMX dynamic runtime library.
Part of Free Pascal runtime library for OS/2
History:
2 June 1997 : Creation.
This unit is Copyright (c) 1999-2000 by Daniel Mantione.
Free Pascal is Copyright (c) -1999-2000 by Florian Klaempfl.
EMX.DLL is Copyright (c) -1999-2000 by Eberhard Mattes.
Modifying this unit is allowed, under the following conditions:
- You will not make anyone beleive that you or someone else wrote this.
- Unless you are developing on the official version of FPC, you will make a
note in this file that it is not the original one.
****************************************************************************}
unit emx;
type PFar=record
Segment,Offset:word;
end;
{! Don't call this one. It is used by the startup code.}
procedure __emxinit;
{! Calling this is not recommended. Use ___syscall instead.}
procedure __emx_syscall;
{This one converts 16:16 far pointers to 32 bit flat ones.}
procedure __emx_16to32(APtr:PFar):pointer;
{This one converts 32 bit flat pointers to 16:16 far ones.}
procedure __emx_32to16(APtr:pointer):PFar;
{This one should be called to call 16-bit procedures and functions.}
procedure __emx_thunk1(APtr:pointer)

113
rtl/emx/emxwrap.imp Normal file
View File

@ -0,0 +1,113 @@
;
; wrap.imp (created by emximp)
;
; -------- emxwrap.def --------
EMX_REVISION EMXWRAP 1 ?
WinDefAVioWindowProc EMXWRAP 30 ?
VioEndPopUp EMXWRAP 101 ?
VioGetPhysBuf EMXWRAP 102 ?
VioGetAnsi EMXWRAP 103 ?
VioSetAnsi EMXWRAP 105 ?
VioDeRegister EMXWRAP 106 ?
VioScrollUp EMXWRAP 107 ?
VioPrtSc EMXWRAP 108 ?
VioGetCurPos EMXWRAP 109 ?
VioWrtCellStr EMXWRAP 110 ?
VioPopUp EMXWRAP 111 ?
VioScrollRt EMXWRAP 112 ?
VioWrtCharStr EMXWRAP 113 ?
VioSetCurPos EMXWRAP 115 ?
VioScrUnLock EMXWRAP 118 ?
VioWrtTTY EMXWRAP 119 ?
VioGetMode EMXWRAP 121 ?
VioSetMode EMXWRAP 122 ?
VioScrLock EMXWRAP 123 ?
VioReadCellStr EMXWRAP 124 ?
VioSavRedrawWait EMXWRAP 125 ?
VioWrtNAttr EMXWRAP 126 ?
VioGetCurType EMXWRAP 127 ?
VioSavRedrawUndo EMXWRAP 128 ?
VioGetFont EMXWRAP 129 ?
VioReadCharStr EMXWRAP 130 ?
VioGetBuf EMXWRAP 131 ?
VioSetCurType EMXWRAP 132 ?
VioSetFont EMXWRAP 133 ?
VioModeUndo EMXWRAP 135 ?
VioModeWait EMXWRAP 137 ?
VioGetCp EMXWRAP 140 ?
VioSetCp EMXWRAP 142 ?
VioShowBuf EMXWRAP 143 ?
VioScrollLf EMXWRAP 144 ?
VioRegister EMXWRAP 145 ?
VioGetConfig EMXWRAP 146 ?
VioScrollDn EMXWRAP 147 ?
VioWrtCharStrAtt EMXWRAP 148 4
VioGetState EMXWRAP 149 ?
VioPrtScToggle EMXWRAP 150 ?
VioSetState EMXWRAP 151 ?
VioWrtNCell EMXWRAP 152 ?
VioWrtNChar EMXWRAP 153 ?
VioAssociate EMXWRAP 155 ?
VioCreatePS EMXWRAP 156 ?
VioDeleteSetId EMXWRAP 157 ?
VioGetDeviceCellSize EMXWRAP 158 ?
VioGetOrg EMXWRAP 159 ?
VioCreateLogFont EMXWRAP 160 ?
VioDestroyPS EMXWRAP 161 ?
VioQuerySetIds EMXWRAP 162 ?
VioSetOrg EMXWRAP 163 ?
VioQueryFonts EMXWRAP 164 ?
VioSetDeviceCellSize EMXWRAP 165 ?
VioShowPS EMXWRAP 166 ?
VioGlobalReg EMXWRAP 170 ?
VioCheckCharType EMXWRAP 175 ?
KbdSetCustXt EMXWRAP 201 ?
KbdGetCp EMXWRAP 203 ?
KbdCharIn EMXWRAP 204 ?
KbdSetCp EMXWRAP 205 ?
KbdSynch EMXWRAP 207 ?
KbdRegister EMXWRAP 208 ?
KbdStringIn EMXWRAP 209 ?
KbdGetStatus EMXWRAP 210 ?
KbdSetStatus EMXWRAP 211 ?
KbdGetFocus EMXWRAP 212 ?
KbdFlushBuffer EMXWRAP 213 ?
KbdXlate EMXWRAP 214 ?
KbdClose EMXWRAP 217 ?
KbdFreeFocus EMXWRAP 218 ?
KbdDeRegister EMXWRAP 220 ?
KbdSetFgnd EMXWRAP 221 ?
KbdPeek EMXWRAP 222 ?
KbdOpen EMXWRAP 223 ?
KbdGetHWID EMXWRAP 224 ?
KbdSetHWID EMXWRAP 225 ?
MouGetPtrShape EMXWRAP 301 ?
MouSetPtrShape EMXWRAP 302 ?
MouGetNumMickeys EMXWRAP 303 ?
MouGetScaleFact EMXWRAP 306 ?
MouFlushQue EMXWRAP 307 ?
MouGetNumButtons EMXWRAP 308 ?
MouClose EMXWRAP 309 ?
MouSetScaleFact EMXWRAP 311 ?
MouGetNumQueEl EMXWRAP 313 ?
MouDeRegister EMXWRAP 314 ?
MouGetEventMask EMXWRAP 315 ?
MouSetEventMask EMXWRAP 316 ?
MouOpen EMXWRAP 317 ?
MouRemovePtr EMXWRAP 318 ?
MouGetPtrPos EMXWRAP 319 ?
MouReadEventQue EMXWRAP 320 ?
MouSetPtrPos EMXWRAP 321 ?
MouGetDevStatus EMXWRAP 322 ?
MouSynch EMXWRAP 323 ?
MouRegister EMXWRAP 324 ?
MouSetDevStatus EMXWRAP 325 ?
MouDrawPtr EMXWRAP 326 ?
MouInitReal EMXWRAP 327 ?
MouSetThreshold EMXWRAP 329 ?
MouGetThreshold EMXWRAP 330 ?
DosMonWrite EMXWRAP 401 ?
DosMonRead EMXWRAP 402 ?
DosMonClose EMXWRAP 403 ?
DosMonOpen EMXWRAP 404 ?
DosMonReg EMXWRAP 405 ?