source: trunk/include/odinwrap.h@ 3189

Last change on this file since 3189 was 3189, checked in by sandervl, 25 years ago

removed heapchecks (by default)
File size: 71.4 KB
RevLine 
[3189]1/* $Id: odinwrap.h,v 1.20 2000-03-21 21:23:08 sandervl Exp $ */
[473]2
3/*
4 * Project Odin Software License can be found in LICENSE.TXT
5 *
6 * ODIN FS: Selector function wrapper macros
7 *
8 * Copyright 1999 Patrick Haller
9 *
10 */
11
12
13#ifndef _ODINWRAP_H_
[1545]14#define _ODINWRAP_H_
[473]15
[2341]16#include <os2sel.h>
[473]17
18/****************************************************************************
19 * Defines *
20 ****************************************************************************/
21
[537]22
[533]23#define ODIN_INTERNAL _Optlink
[473]24
25
[475]26#ifdef DEBUG
27# define ODINDEBUGCHANNEL(a) static char* pszOdinDebugChannel=#a;
28#else
29# define ODINDEBUGCHANNEL(a)
30#endif
31
32
[1642]33//SvL: Define this to use the internal wrapper function of a specific api
34#define ODIN_EXTERN(a) ODIN_INTERNAL ODIN_##a
35
[475]36#ifdef DEBUG
37
[1439]38//@@@PH 1999/10/25 IBM VAC++ debug memory support
39#include <malloc.h>
40
[1669]41#if 1
42#define CheckFS(a)
43#else
44//SvL: Eases locating apis that corrupt FS
45#define error_FSSelector "FS Selector for thread %d corrupted!!!"
46
47extern int IsExeStarted(); //kernel32
48
49#define CheckFS(sel) if(sel == 0x150b && IsExeStarted()) { \
50 dprintf(((char *)error_FSSelector, GetCurrentThreadId())); \
51 }
52#endif
53
[1545]54//SvL: Only check the heap very frequently when there are problems
55//#define DEBUG_ODINHEAP
56
57#ifdef DEBUG_ODINHEAP
58#define ODIN_HEAPCHECK() _heap_check()
59#else
60#define ODIN_HEAPCHECK()
61#endif
62
[473]63/****************************************************************************
[475]64 * General Wrapper Macros (debug instrumented) *
65 ****************************************************************************/
66
67/* ---------- 0 parameters ---------- */
68#define ODINFUNCTION0(cRet,cName) \
[484]69 cRet ODIN_INTERNAL ODIN_##cName (void); \
70 cRet WINAPI cName(void) \
[475]71 { \
72 unsigned short sel = RestoreOS2FS(); \
73 dprintf(("%s: "#cRet" "#cName"() enter\n", \
74 pszOdinDebugChannel)); \
[1669]75 CheckFS(sel) \
[3189]76 ODIN_HEAPCHECK(); \
[594]77 cRet rc = ODIN_##cName(); \
[3189]78 ODIN_HEAPCHECK(); \
[475]79 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
80 pszOdinDebugChannel, \
81 rc)); \
82 SetFS(sel); \
83 return rc; \
84 } \
85 \
[484]86 cRet ODIN_INTERNAL ODIN_##cName (void)
[475]87
88
89#define ODINPROCEDURE0(cName) \
[484]90 void ODIN_INTERNAL ODIN_##cName (void); \
91 void WINAPI cName(void) \
[475]92 { \
93 unsigned short sel = RestoreOS2FS(); \
94 dprintf(("%s: void "#cName"() enter\n", \
95 pszOdinDebugChannel)); \
[1669]96 CheckFS(sel) \
[3189]97 ODIN_HEAPCHECK(); \
[491]98 ODIN_##cName(); \
[3189]99 ODIN_HEAPCHECK(); \
[475]100 dprintf(("%s: void "#cName"() leave\n", \
101 pszOdinDebugChannel)); \
102 SetFS(sel); \
103 } \
104 \
[484]105 void ODIN_INTERNAL ODIN_##cName (void)
[475]106
107
108/* ---------- 1 parameters ---------- */
109#define ODINFUNCTION1(cRet,cName,t1,a1) \
[484]110 cRet ODIN_INTERNAL ODIN_##cName (t1 a1); \
111 cRet WINAPI cName(t1 a1) \
[475]112 { \
113 unsigned short sel = RestoreOS2FS(); \
114 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh) enter\n", \
115 pszOdinDebugChannel, \
116 a1)); \
[1669]117 CheckFS(sel) \
[3189]118 ODIN_HEAPCHECK(); \
[491]119 cRet rc = ODIN_##cName(a1); \
[3189]120 ODIN_HEAPCHECK(); \
[475]121 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
122 pszOdinDebugChannel, \
123 rc)); \
124 SetFS(sel); \
125 return rc; \
126 } \
127 \
[484]128 cRet ODIN_INTERNAL ODIN_##cName (t1 a1)
[475]129
130#define ODINPROCEDURE1(cName,t1,a1) \
[484]131 void ODIN_INTERNAL ODIN_##cName (t1 a1); \
132 void WINAPI cName(t1 a1) \
[475]133 { \
134 unsigned short sel = RestoreOS2FS(); \
135 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh) enter\n", \
136 pszOdinDebugChannel, \
137 a1)); \
[1669]138 CheckFS(sel) \
[3189]139 ODIN_HEAPCHECK(); \
[491]140 ODIN_##cName(a1); \
[3189]141 ODIN_HEAPCHECK(); \
[475]142 dprintf(("%s: void "#cName"() leave\n", \
143 pszOdinDebugChannel)); \
144 SetFS(sel); \
145 } \
146 \
[484]147 void ODIN_INTERNAL ODIN_##cName (t1 a1)
[475]148
149
150/* ---------- 2 parameters ---------- */
151#define ODINFUNCTION2(cRet,cName,t1,a1,t2,a2) \
[484]152 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2); \
153 cRet WINAPI cName(t1 a1,t2 a2) \
[475]154 { \
155 unsigned short sel = RestoreOS2FS(); \
156 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh) enter\n", \
157 pszOdinDebugChannel, \
158 a1,a2)); \
[1669]159 CheckFS(sel) \
[3189]160 ODIN_HEAPCHECK(); \
[491]161 cRet rc = ODIN_##cName(a1,a2); \
[3189]162 ODIN_HEAPCHECK(); \
[475]163 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
164 pszOdinDebugChannel, \
165 rc)); \
166 SetFS(sel); \
167 return rc; \
168 } \
169 \
[484]170 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2)
[475]171
172#define ODINPROCEDURE2(cName,t1,a1,t2,a2) \
[484]173 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2); \
174 void WINAPI cName(t1 a1,t2 a2) \
[475]175 { \
176 unsigned short sel = RestoreOS2FS(); \
177 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh) enter\n", \
178 pszOdinDebugChannel, \
179 a1,a2)); \
[1669]180 CheckFS(sel) \
[3189]181 ODIN_HEAPCHECK(); \
[491]182 ODIN_##cName(a1,a2); \
[3189]183 ODIN_HEAPCHECK(); \
[475]184 dprintf(("%s: void "#cName"() leave\n", \
185 pszOdinDebugChannel)); \
186 SetFS(sel); \
187 } \
188 \
[484]189 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2)
[475]190
191
192/* ---------- 3 parameters ---------- */
193#define ODINFUNCTION3(cRet,cName,t1,a1,t2,a2,t3,a3) \
[484]194 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3); \
195 cRet WINAPI cName(t1 a1,t2 a2,t3 a3) \
[475]196 { \
197 unsigned short sel = RestoreOS2FS(); \
198 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh) enter\n", \
199 pszOdinDebugChannel, \
200 a1,a2,a3)); \
[1669]201 CheckFS(sel) \
[3189]202 ODIN_HEAPCHECK(); \
[491]203 cRet rc = ODIN_##cName(a1,a2,a3); \
[3189]204 ODIN_HEAPCHECK(); \
[475]205 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
206 pszOdinDebugChannel, \
207 rc)); \
208 SetFS(sel); \
209 return rc; \
210 } \
211 \
[484]212 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3)
[475]213
214#define ODINPROCEDURE3(cName,t1,a1,t2,a2,t3,a3) \
[484]215 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3); \
216 void WINAPI cName(t1 a1,t2 a2,t3 a3) \
[475]217 { \
218 unsigned short sel = RestoreOS2FS(); \
219 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh) enter\n", \
220 pszOdinDebugChannel, \
221 a1,a2,a3)); \
[1669]222 CheckFS(sel) \
[3189]223 ODIN_HEAPCHECK(); \
[491]224 ODIN_##cName(a1,a2,a3); \
[3189]225 ODIN_HEAPCHECK(); \
[475]226 dprintf(("%s: void "#cName"() leave\n", \
227 pszOdinDebugChannel)); \
228 SetFS(sel); \
229 } \
230 \
[484]231 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3)
[475]232
233
234/* ---------- 4 parameters ---------- */
235#define ODINFUNCTION4(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4) \
[484]236 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4); \
237 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4) \
[475]238 { \
239 unsigned short sel = RestoreOS2FS(); \
[1437]240 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh, "#t4" "#a4"=%08xh) enter\n", \
[475]241 pszOdinDebugChannel, \
242 a1,a2,a3,a4)); \
[1669]243 CheckFS(sel) \
[3189]244 ODIN_HEAPCHECK(); \
[491]245 cRet rc = ODIN_##cName(a1,a2,a3,a4); \
[3189]246 ODIN_HEAPCHECK(); \
[475]247 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
248 pszOdinDebugChannel, \
249 rc)); \
250 SetFS(sel); \
251 return rc; \
252 } \
253 \
[484]254 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4)
[475]255
256#define ODINPROCEDURE4(cName,t1,a1,t2,a2,t3,a3,t4,a4) \
[484]257 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4); \
258 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4) \
[475]259 { \
260 unsigned short sel = RestoreOS2FS(); \
261 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh, "#t4" "#a4"=%08xh) enter\n", \
262 pszOdinDebugChannel, \
263 a1,a2,a3,a4)); \
[1669]264 CheckFS(sel) \
[3189]265 ODIN_HEAPCHECK(); \
[491]266 ODIN_##cName(a1,a2,a3,a4); \
[3189]267 ODIN_HEAPCHECK(); \
[475]268 dprintf(("%s: void "#cName"() leave\n", \
269 pszOdinDebugChannel)); \
270 SetFS(sel); \
271 } \
272 \
[484]273 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4)
[475]274
275
276/* ---------- 5 parameters ---------- */
277#define ODINFUNCTION5(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5) \
[484]278 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5); \
279 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5) \
[475]280 { \
281 unsigned short sel = RestoreOS2FS(); \
[1437]282 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh" \
[475]283 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh) enter\n", \
284 pszOdinDebugChannel, \
285 a1,a2,a3,a4,a5)); \
[1669]286 CheckFS(sel) \
[3189]287 ODIN_HEAPCHECK(); \
[491]288 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5); \
[3189]289 ODIN_HEAPCHECK(); \
[475]290 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
291 pszOdinDebugChannel, \
292 rc)); \
293 SetFS(sel); \
294 return rc; \
295 } \
296 \
[484]297 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5)
[475]298
299#define ODINPROCEDURE5(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5) \
[484]300 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5); \
301 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5) \
[475]302 { \
303 unsigned short sel = RestoreOS2FS(); \
304 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
305 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh) enter\n", \
306 pszOdinDebugChannel, \
307 a1,a2,a3,a4,a5)); \
[1669]308 CheckFS(sel) \
[3189]309 ODIN_HEAPCHECK(); \
[491]310 ODIN_##cName(a1,a2,a3,a4,a5); \
[3189]311 ODIN_HEAPCHECK(); \
[475]312 dprintf(("%s: void "#cName"() leave\n", \
313 pszOdinDebugChannel)); \
314 SetFS(sel); \
315 } \
316 \
[484]317 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5)
[475]318
319
320/* ---------- 6 parameters ---------- */
321#define ODINFUNCTION6(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6) \
[484]322 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6); \
323 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6) \
[475]324 { \
325 unsigned short sel = RestoreOS2FS(); \
[1437]326 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
[476]327 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh) enter\n", \
[475]328 pszOdinDebugChannel, \
[1437]329 a1,a2,a3,a4,a5,a6)); \
[1669]330 CheckFS(sel) \
[3189]331 ODIN_HEAPCHECK(); \
[491]332 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6); \
[3189]333 ODIN_HEAPCHECK(); \
[475]334 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
335 pszOdinDebugChannel, \
336 rc)); \
337 SetFS(sel); \
338 return rc; \
339 } \
340 \
[484]341 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6)
[475]342
[2241]343// @@@PH 1999/12/28 the following macro is a workaround for WINMM:waveOutOpen
344// where the system needs to know about the win32 tib fs selector
345#define ODINFUNCTION6FS(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6) \
346 cRet ODIN_INTERNAL ODIN_##cName (unsigned short selFS, t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6); \
347 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6) \
348 { \
349 unsigned short sel = RestoreOS2FS(); \
350 dprintf(("%s: "#cRet" "#cName"(selFS=%04xh, "#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
351 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh) enter\n", \
352 pszOdinDebugChannel, \
353 sel, \
354 a1,a2,a3,a4,a5,a6)); \
355 CheckFS(sel) \
[3189]356 ODIN_HEAPCHECK(); \
[2241]357 cRet rc = ODIN_##cName(sel,a1,a2,a3,a4,a5,a6); \
[3189]358 ODIN_HEAPCHECK(); \
[2241]359 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
360 pszOdinDebugChannel, \
361 rc)); \
362 SetFS(sel); \
363 return rc; \
364 } \
365 \
366 cRet ODIN_INTERNAL ODIN_##cName (unsigned short selFS, t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6)
367
368
[475]369#define ODINPROCEDURE6(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6) \
[484]370 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6); \
371 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6) \
[475]372 { \
373 unsigned short sel = RestoreOS2FS(); \
[476]374 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
375 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh) enter\n", \
[475]376 pszOdinDebugChannel, \
[1437]377 a1,a2,a3,a4,a5,a6)); \
[1669]378 CheckFS(sel) \
[3189]379 ODIN_HEAPCHECK(); \
[491]380 ODIN_##cName(a1,a2,a3,a4,a5,a6); \
[3189]381 ODIN_HEAPCHECK(); \
[475]382 dprintf(("%s: void "#cName"() leave\n", \
383 pszOdinDebugChannel)); \
384 SetFS(sel); \
385 } \
386 \
[484]387 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6)
[475]388
389
390/* ---------- 7 parameters ---------- */
391#define ODINFUNCTION7(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7) \
[484]392 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7); \
393 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7) \
[475]394 { \
395 unsigned short sel = RestoreOS2FS(); \
[1437]396 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
[476]397 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh) enter\n", \
[475]398 pszOdinDebugChannel, \
[1437]399 a1,a2,a3,a4,a5,a6,a7)); \
[1669]400 CheckFS(sel) \
[3189]401 ODIN_HEAPCHECK(); \
[491]402 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7); \
[3189]403 ODIN_HEAPCHECK(); \
[475]404 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
405 pszOdinDebugChannel, \
406 rc)); \
407 SetFS(sel); \
408 return rc; \
409 } \
410 \
[484]411 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7)
[475]412
413#define ODINPROCEDURE7(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7) \
[484]414 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7); \
415 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7) \
[475]416 { \
417 unsigned short sel = RestoreOS2FS(); \
[476]418 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
419 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh) enter\n", \
[475]420 pszOdinDebugChannel, \
[1437]421 a1,a2,a3,a4,a5,a6,a7)); \
[1669]422 CheckFS(sel) \
[3189]423 ODIN_HEAPCHECK(); \
[491]424 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7); \
[3189]425 ODIN_HEAPCHECK(); \
[475]426 dprintf(("%s: void "#cName"() leave\n", \
427 pszOdinDebugChannel)); \
428 SetFS(sel); \
429 } \
430 \
[484]431 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7)
[475]432
433
434/* ---------- 8 parameters ---------- */
435#define ODINFUNCTION8(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8) \
[484]436 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8); \
437 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8) \
[475]438 { \
439 unsigned short sel = RestoreOS2FS(); \
[1437]440 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
[476]441 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
442 ", "#t8" "#a8"=%08xh) enter\n", \
[475]443 pszOdinDebugChannel, \
[1437]444 a1,a2,a3,a4,a5,a6,a7,a8)); \
[1669]445 CheckFS(sel) \
[3189]446 ODIN_HEAPCHECK(); \
[491]447 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8); \
[3189]448 ODIN_HEAPCHECK(); \
[475]449 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
450 pszOdinDebugChannel, \
451 rc)); \
452 SetFS(sel); \
453 return rc; \
454 } \
455 \
[484]456 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8)
[475]457
458#define ODINPROCEDURE8(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8) \
[484]459 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8); \
460 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8) \
[475]461 { \
462 unsigned short sel = RestoreOS2FS(); \
[476]463 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
464 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
465 ", "#t8" "#a8"=%08xh) enter\n", \
[475]466 pszOdinDebugChannel, \
[1437]467 a1,a2,a3,a4,a5,a6,a7,a8)); \
[3189]468 ODIN_HEAPCHECK(); \
[1669]469 CheckFS(sel) \
[491]470 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8); \
[3189]471 ODIN_HEAPCHECK(); \
[475]472 dprintf(("%s: void "#cName"() leave\n", \
473 pszOdinDebugChannel)); \
474 SetFS(sel); \
475 } \
476 \
[484]477 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8)
[475]478
479
480/* ---------- 9 parameters ---------- */
481#define ODINFUNCTION9(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9) \
[484]482 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9); \
483 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9) \
[475]484 { \
485 unsigned short sel = RestoreOS2FS(); \
[476]486 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
487 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
488 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh) enter\n", \
[475]489 pszOdinDebugChannel, \
[1437]490 a1,a2,a3,a4,a5,a6,a7,a8,a9)); \
[1669]491 CheckFS(sel) \
[3189]492 ODIN_HEAPCHECK(); \
[491]493 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9); \
[3189]494 ODIN_HEAPCHECK(); \
[475]495 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
496 pszOdinDebugChannel, \
497 rc)); \
498 SetFS(sel); \
499 return rc; \
500 } \
501 \
[484]502 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9)
[475]503
504#define ODINPROCEDURE9(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9) \
[484]505 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9); \
506 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9) \
[475]507 { \
508 unsigned short sel = RestoreOS2FS(); \
[476]509 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
510 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
511 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh) enter\n", \
[475]512 pszOdinDebugChannel, \
[1437]513 a1,a2,a3,a4,a5,a6,a7,a8,a9)); \
[1669]514 CheckFS(sel) \
[3189]515 ODIN_HEAPCHECK(); \
[491]516 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9); \
[3189]517 ODIN_HEAPCHECK(); \
[475]518 dprintf(("%s: void "#cName"() leave\n", \
519 pszOdinDebugChannel)); \
520 SetFS(sel); \
521 } \
522 \
[484]523 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9)
[475]524
525
526/* ---------- 10 parameters ---------- */
527#define ODINFUNCTION10(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10) \
[484]528 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10); \
529 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10) \
[475]530 { \
531 unsigned short sel = RestoreOS2FS(); \
[1437]532 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
[476]533 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
534 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh, "#t10" "#a10"=%08xh) enter\n", \
[475]535 pszOdinDebugChannel, \
[1437]536 a1,a2,a3,a4,a5,a6,a7,a8,a9,a10));\
[1669]537 CheckFS(sel) \
[3189]538 ODIN_HEAPCHECK(); \
[491]539 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10); \
[3189]540 ODIN_HEAPCHECK(); \
[475]541 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
542 pszOdinDebugChannel, \
543 rc)); \
544 SetFS(sel); \
545 return rc; \
546 } \
547 \
[484]548 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10)
[475]549
550#define ODINPROCEDURE10(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10) \
[484]551 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10); \
552 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10) \
[475]553 { \
554 unsigned short sel = RestoreOS2FS(); \
[476]555 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
556 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
557 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh, "#t10" "#a10"=%08xh) enter\n", \
[475]558 pszOdinDebugChannel, \
559 a1,a2,a3)); \
[1669]560 CheckFS(sel) \
[3189]561 ODIN_HEAPCHECK(); \
[491]562 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10); \
[3189]563 ODIN_HEAPCHECK(); \
[475]564 dprintf(("%s: void "#cName"() leave\n", \
565 pszOdinDebugChannel)); \
566 SetFS(sel); \
567 } \
568 \
[484]569 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10)
[475]570
571
572/* ---------- 11 parameters ---------- */
573#define ODINFUNCTION11(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11) \
[484]574 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11); \
575 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11) \
[475]576 { \
577 unsigned short sel = RestoreOS2FS(); \
[1437]578 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
[476]579 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
580 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh, "#t10" "#a10"=%08xh, "#t11" "#a11"=%08xh) enter\n", \
[475]581 pszOdinDebugChannel, \
[1437]582 a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11)); \
[1669]583 CheckFS(sel) \
[3189]584 ODIN_HEAPCHECK(); \
[491]585 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11); \
[3189]586 ODIN_HEAPCHECK(); \
[475]587 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
588 pszOdinDebugChannel, \
589 rc)); \
590 SetFS(sel); \
591 return rc; \
592 } \
593 \
[484]594 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11)
[475]595
596#define ODINPROCEDURE11(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11) \
[484]597 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11); \
598 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11) \
[475]599 { \
600 unsigned short sel = RestoreOS2FS(); \
[476]601 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
602 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
603 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh, "#t10" "#a10"=%08xh, "#t11" "#a11"=%08xh) enter\n", \
[475]604 pszOdinDebugChannel, \
[1437]605 a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11)); \
[1669]606 CheckFS(sel) \
[3189]607 ODIN_HEAPCHECK(); \
[491]608 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11); \
[3189]609 ODIN_HEAPCHECK(); \
[475]610 dprintf(("%s: void "#cName"() leave\n", \
611 pszOdinDebugChannel)); \
612 SetFS(sel); \
613 } \
614 \
[484]615 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11)
[475]616
617
618/* ---------- 12 parameters ---------- */
619#define ODINFUNCTION12(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12) \
[484]620 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12); \
621 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12) \
[475]622 { \
623 unsigned short sel = RestoreOS2FS(); \
[1437]624 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
[476]625 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
626 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh, "#t10" "#a10"=%08xh, "#t11" "#a11"=%08xh" \
627 ", "#t12" "#a12"=%08xh) enter\n", \
[475]628 pszOdinDebugChannel, \
[1437]629 a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12)); \
[1669]630 CheckFS(sel) \
[3189]631 ODIN_HEAPCHECK(); \
[491]632 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12); \
[3189]633 ODIN_HEAPCHECK(); \
[475]634 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
635 pszOdinDebugChannel, \
636 rc)); \
637 SetFS(sel); \
638 return rc; \
639 } \
640 \
[484]641 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12)
[475]642
643#define ODINPROCEDURE12(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12) \
[484]644 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12); \
645 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12) \
[475]646 { \
647 unsigned short sel = RestoreOS2FS(); \
[476]648 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
649 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
650 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh, "#t10" "#a10"=%08xh, "#t11" "#a11"=%08xh" \
651 ", "#t12" "#a12"=%08xh) enter\n", \
[475]652 pszOdinDebugChannel, \
[1696]653 a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12)); \
[1669]654 CheckFS(sel) \
[3189]655 ODIN_HEAPCHECK(); \
[491]656 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12); \
[3189]657 ODIN_HEAPCHECK(); \
[475]658 dprintf(("%s: void "#cName"() leave\n", \
659 pszOdinDebugChannel)); \
660 SetFS(sel); \
661 } \
662 \
[484]663 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12)
[475]664
665
[1696]666/* ---------- 13 parameters ---------- */
667#define ODINFUNCTION13(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12,t13,a13) \
668 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13); \
669 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13) \
670 { \
671 unsigned short sel = RestoreOS2FS(); \
672 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
673 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
674 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh, "#t10" "#a10"=%08xh, "#t11" "#a11"=%08xh" \
675 ", "#t12" "#a12"=%08xh, "#t13" "#a13"=%08xh) enter\n", \
676 pszOdinDebugChannel, \
677 a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13)); \
678 CheckFS(sel) \
[3189]679 ODIN_HEAPCHECK(); \
[1696]680 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13); \
[3189]681 ODIN_HEAPCHECK(); \
[1696]682 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
683 pszOdinDebugChannel, \
684 rc)); \
685 SetFS(sel); \
686 return rc; \
687 } \
688 \
689 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13)
690
691#define ODINPROCEDURE13(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12,t13,a13) \
692 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13); \
693 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13) \
694 { \
695 unsigned short sel = RestoreOS2FS(); \
696 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
697 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
698 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh, "#t10" "#a10"=%08xh, "#t11" "#a11"=%08xh" \
699 ", "#t12" "#a12"=%08xh, "#t13" "#a13"=%08xh, ) enter\n", \
700 pszOdinDebugChannel, \
701 a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13)); \
702 CheckFS(sel) \
[3189]703 ODIN_HEAPCHECK(); \
[1696]704 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13); \
[3189]705 ODIN_HEAPCHECK(); \
[1696]706 dprintf(("%s: void "#cName"() leave\n", \
707 pszOdinDebugChannel)); \
708 SetFS(sel); \
709 } \
710 \
711 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13)
712
713
714/* ---------- 14 parameters ---------- */
715#define ODINFUNCTION14(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12,t13,a13,t14,a14) \
716 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14); \
717 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14) \
718 { \
719 unsigned short sel = RestoreOS2FS(); \
720 dprintf(("%s: "#cRet" "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
721 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
722 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh, "#t10" "#a10"=%08xh, "#t11" "#a11"=%08xh" \
723 ", "#t12" "#a12"=%08xh, "#t13" "#a13"=%08xh, "#t14" "#a14"=%08xh) enter\n", \
724 pszOdinDebugChannel, \
725 a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14)); \
726 CheckFS(sel) \
[3189]727 ODIN_HEAPCHECK(); \
[1696]728 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14); \
[3189]729 ODIN_HEAPCHECK(); \
[1696]730 dprintf(("%s: "#cRet" "#cName"() leave = %08xh\n", \
731 pszOdinDebugChannel, \
732 rc)); \
733 SetFS(sel); \
734 return rc; \
735 } \
736 \
737 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14)
738
739#define ODINPROCEDURE14(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12,t13,a13,t14,a14) \
[1953]740 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14); \
[1696]741 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14) \
742 { \
743 unsigned short sel = RestoreOS2FS(); \
744 dprintf(("%s: void "#cName"("#t1" "#a1"=%08xh, "#t2" "#a2"=%08xh, "#t3" "#a3"=%08xh)" \
745 ", "#t4" "#a4"=%08xh, "#t5" "#a5"=%08xh, "#t6" "#a6"=%08xh, "#t7" "#a7"=%08xh" \
746 ", "#t8" "#a8"=%08xh, "#t9" "#a9"=%08xh, "#t10" "#a10"=%08xh, "#t11" "#a11"=%08xh" \
747 ", "#t12" "#a12"=%08xh, "#t13" "#a13"=%08xh, "#t14" "#a14"=%08xh) enter\n", \
748 pszOdinDebugChannel, \
749 a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14)); \
750 CheckFS(sel) \
[3189]751 ODIN_HEAPCHECK(); \
[1696]752 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14); \
[3189]753 ODIN_HEAPCHECK(); \
[1696]754 dprintf(("%s: void "#cName"() leave\n", \
755 pszOdinDebugChannel)); \
756 SetFS(sel); \
757 } \
758 \
759 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14)
760
761
[475]762#else
763
764/****************************************************************************
[473]765 * General Wrapper Macros *
766 ****************************************************************************/
767
768/* ---------- 0 parameters ---------- */
769#define ODINFUNCTION0(cRet,cName) \
[484]770 cRet ODIN_INTERNAL ODIN_##cName (void);\
771 cRet WINAPI cName(void) \
[473]772 { \
773 unsigned short sel = RestoreOS2FS(); \
[491]774 cRet rc = ODIN_##cName(); \
[473]775 SetFS(sel); \
776 return rc; \
777 } \
778 \
[484]779 cRet ODIN_INTERNAL ODIN_##cName (void)
[473]780
781
782#define ODINPROCEDURE0(cName) \
[484]783 void ODIN_INTERNAL ODIN_##cName (void);\
784 void WINAPI cName(void) \
[473]785 { \
786 unsigned short sel = RestoreOS2FS(); \
[491]787 ODIN_##cName(); \
[473]788 SetFS(sel); \
789 } \
790 \
[484]791 void ODIN_INTERNAL ODIN_##cName (void)
[473]792
793
794/* ---------- 1 parameters ---------- */
795#define ODINFUNCTION1(cRet,cName,t1,a1) \
[484]796 cRet ODIN_INTERNAL ODIN_##cName (t1 a1);\
797 cRet WINAPI cName(t1 a1) \
[473]798 { \
799 unsigned short sel = RestoreOS2FS(); \
[491]800 cRet rc = ODIN_##cName(a1); \
[473]801 SetFS(sel); \
802 return rc; \
803 } \
804 \
[484]805 cRet ODIN_INTERNAL ODIN_##cName (t1 a1)
[473]806
807#define ODINPROCEDURE1(cName,t1,a1) \
[484]808 void ODIN_INTERNAL ODIN_##cName (t1 a1);\
809 void WINAPI cName(t1 a1) \
[473]810 { \
811 unsigned short sel = RestoreOS2FS(); \
[491]812 ODIN_##cName(a1); \
[473]813 SetFS(sel); \
814 } \
815 \
[484]816 void ODIN_INTERNAL ODIN_##cName (t1 a1)
[473]817
818
819/* ---------- 2 parameters ---------- */
820#define ODINFUNCTION2(cRet,cName,t1,a1,t2,a2) \
[484]821 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2); \
822 cRet WINAPI cName(t1 a1,t2 a2) \
[473]823 { \
824 unsigned short sel = RestoreOS2FS(); \
[491]825 cRet rc = ODIN_##cName(a1,a2); \
[473]826 SetFS(sel); \
827 return rc; \
828 } \
829 \
[484]830 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2)
[473]831
832#define ODINPROCEDURE2(cName,t1,a1,t2,a2) \
[484]833 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2);\
834 void WINAPI cName(t1 a1,t2 a2) \
[473]835 { \
836 unsigned short sel = RestoreOS2FS(); \
[491]837 ODIN_##cName(a1,a2); \
[473]838 SetFS(sel); \
839 } \
840 \
[484]841 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2)
[473]842
843
844/* ---------- 3 parameters ---------- */
845#define ODINFUNCTION3(cRet,cName,t1,a1,t2,a2,t3,a3) \
[484]846 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3); \
847 cRet WINAPI cName(t1 a1,t2 a2,t3 a3) \
[473]848 { \
849 unsigned short sel = RestoreOS2FS(); \
[491]850 cRet rc = ODIN_##cName(a1,a2,a3); \
[473]851 SetFS(sel); \
852 return rc; \
853 } \
854 \
[484]855 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3)
[473]856
857#define ODINPROCEDURE3(cName,t1,a1,t2,a2,t3,a3) \
[484]858 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3); \
859 void WINAPI cName(t1 a1,t2 a2,t3 a3) \
[473]860 { \
861 unsigned short sel = RestoreOS2FS(); \
[491]862 ODIN_##cName(a1,a2,a3); \
[473]863 SetFS(sel); \
864 } \
865 \
[484]866 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3)
[473]867
868
869/* ---------- 4 parameters ---------- */
870#define ODINFUNCTION4(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4) \
[484]871 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4); \
872 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4) \
[473]873 { \
874 unsigned short sel = RestoreOS2FS(); \
[491]875 cRet rc = ODIN_##cName(a1,a2,a3,a4); \
[473]876 SetFS(sel); \
877 return rc; \
878 } \
879 \
[484]880 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4)
[473]881
882#define ODINPROCEDURE4(cName,t1,a1,t2,a2,t3,a3,t4,a4) \
[484]883 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4); \
884 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4) \
[473]885 { \
886 unsigned short sel = RestoreOS2FS(); \
[491]887 ODIN_##cName(a1,a2,a3,a4); \
[473]888 SetFS(sel); \
889 } \
890 \
[484]891 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4)
[473]892
893
894/* ---------- 5 parameters ---------- */
895#define ODINFUNCTION5(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5) \
[484]896 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5); \
897 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5) \
[473]898 { \
899 unsigned short sel = RestoreOS2FS(); \
[491]900 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5); \
[473]901 SetFS(sel); \
902 return rc; \
903 } \
904 \
[484]905 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5)
[473]906
907#define ODINPROCEDURE5(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5) \
[484]908 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5); \
909 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5) \
[473]910 { \
911 unsigned short sel = RestoreOS2FS(); \
[491]912 ODIN_##cName(a1,a2,a3,a4,a5); \
[473]913 SetFS(sel); \
914 } \
915 \
[484]916 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5)
[473]917
918
919/* ---------- 6 parameters ---------- */
920#define ODINFUNCTION6(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6) \
[484]921 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6); \
922 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6) \
[473]923 { \
924 unsigned short sel = RestoreOS2FS(); \
[491]925 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6); \
[473]926 SetFS(sel); \
927 return rc; \
928 } \
929 \
[484]930 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6)
[473]931
[2241]932
933// @@@PH 1999/12/28 the following macro is a workaround for WINMM:waveOutOpen
934// where the system needs to know about the win32 tib fs selector
935#define ODINFUNCTION6FS(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6) \
936 cRet ODIN_INTERNAL ODIN_##cName (unsigned short selFS, t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6); \
937 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6) \
938 { \
939 unsigned short sel = RestoreOS2FS(); \
940 cRet rc = ODIN_##cName(sel,a1,a2,a3,a4,a5,a6); \
941 SetFS(sel); \
942 return rc; \
943 } \
944 \
945 cRet ODIN_INTERNAL ODIN_##cName (unsigned short selFS, t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6)
946
947
[473]948#define ODINPROCEDURE6(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6) \
[484]949 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6); \
950 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6) \
[473]951 { \
952 unsigned short sel = RestoreOS2FS(); \
[491]953 ODIN_##cName(a1,a2,a3,a4,a5,a6); \
[473]954 SetFS(sel); \
955 } \
956 \
[484]957 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6)
[473]958
959
960/* ---------- 7 parameters ---------- */
961#define ODINFUNCTION7(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7) \
[484]962 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7); \
963 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7) \
[473]964 { \
965 unsigned short sel = RestoreOS2FS(); \
[491]966 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7); \
[473]967 SetFS(sel); \
968 return rc; \
969 } \
970 \
[484]971 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7)
[473]972
973#define ODINPROCEDURE7(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7) \
[484]974 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7); \
975 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7) \
[473]976 { \
977 unsigned short sel = RestoreOS2FS(); \
[491]978 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7); \
[473]979 SetFS(sel); \
980 } \
981 \
[484]982 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7)
[473]983
984
985/* ---------- 8 parameters ---------- */
986#define ODINFUNCTION8(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8) \
[484]987 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8); \
988 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8) \
[473]989 { \
990 unsigned short sel = RestoreOS2FS(); \
[491]991 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8); \
[473]992 SetFS(sel); \
993 return rc; \
994 } \
995 \
[595]996 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8)
[473]997
998#define ODINPROCEDURE8(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8) \
[484]999 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8); \
1000 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8) \
[473]1001 { \
1002 unsigned short sel = RestoreOS2FS(); \
[491]1003 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8); \
[473]1004 SetFS(sel); \
1005 } \
1006 \
[484]1007 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8)
[473]1008
1009
[475]1010/* ---------- 9 parameters ---------- */
1011#define ODINFUNCTION9(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9) \
[484]1012 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9); \
1013 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9) \
[475]1014 { \
1015 unsigned short sel = RestoreOS2FS(); \
[491]1016 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9); \
[475]1017 SetFS(sel); \
1018 return rc; \
1019 } \
1020 \
[595]1021 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9)
[473]1022
[475]1023#define ODINPROCEDURE9(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9) \
[484]1024 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9); \
1025 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9) \
[475]1026 { \
1027 unsigned short sel = RestoreOS2FS(); \
[491]1028 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9); \
[475]1029 SetFS(sel); \
1030 } \
1031 \
[484]1032 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9)
[475]1033
1034
1035/* ---------- 10 parameters ---------- */
1036#define ODINFUNCTION10(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10) \
[484]1037 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10); \
1038 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10) \
[475]1039 { \
1040 unsigned short sel = RestoreOS2FS(); \
[491]1041 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10); \
[475]1042 SetFS(sel); \
1043 return rc; \
1044 } \
1045 \
[595]1046 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10)
[475]1047
1048#define ODINPROCEDURE10(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10) \
[484]1049 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10); \
1050 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10) \
[475]1051 { \
1052 unsigned short sel = RestoreOS2FS(); \
[491]1053 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10); \
[475]1054 SetFS(sel); \
1055 } \
1056 \
[484]1057 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10)
[475]1058
1059
1060/* ---------- 11 parameters ---------- */
1061#define ODINFUNCTION11(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11) \
[484]1062 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11); \
1063 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11) \
[475]1064 { \
1065 unsigned short sel = RestoreOS2FS(); \
[491]1066 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11); \
[475]1067 SetFS(sel); \
1068 return rc; \
1069 } \
1070 \
[595]1071 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11)
[475]1072
1073#define ODINPROCEDURE11(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11) \
[484]1074 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11); \
1075 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11) \
[475]1076 { \
1077 unsigned short sel = RestoreOS2FS(); \
[491]1078 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11); \
[475]1079 SetFS(sel); \
1080 } \
1081 \
[484]1082 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11)
[475]1083
1084
1085/* ---------- 12 parameters ---------- */
1086#define ODINFUNCTION12(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12) \
[484]1087 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12); \
1088 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12) \
[475]1089 { \
1090 unsigned short sel = RestoreOS2FS(); \
[491]1091 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12); \
[475]1092 SetFS(sel); \
1093 return rc; \
1094 } \
1095 \
[595]1096 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12)
[475]1097
1098#define ODINPROCEDURE12(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12) \
[484]1099 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12); \
1100 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12) \
[475]1101 { \
1102 unsigned short sel = RestoreOS2FS(); \
[491]1103 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12); \
[475]1104 SetFS(sel); \
1105 } \
1106 \
[484]1107 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12)
[475]1108
1109
1110
1111#endif
1112
[1669]1113/****************************************************************************
1114 * General Wrapper Macros *
1115 ****************************************************************************/
1116
1117/* ---------- 0 parameters ---------- */
1118#define ODINFUNCTIONNODBG0(cRet,cName) \
1119 cRet ODIN_INTERNAL ODIN_##cName (void);\
1120 cRet WINAPI cName(void) \
1121 { \
1122 unsigned short sel = RestoreOS2FS(); \
1123 cRet rc = ODIN_##cName(); \
1124 SetFS(sel); \
1125 return rc; \
1126 } \
1127 \
1128 cRet ODIN_INTERNAL ODIN_##cName (void)
1129
1130
1131#define ODINPROCEDURENODBG0(cName) \
1132 void ODIN_INTERNAL ODIN_##cName (void);\
1133 void WINAPI cName(void) \
1134 { \
1135 unsigned short sel = RestoreOS2FS(); \
1136 ODIN_##cName(); \
1137 SetFS(sel); \
1138 } \
1139 \
1140 void ODIN_INTERNAL ODIN_##cName (void)
1141
1142
1143/* ---------- 1 parameters ---------- */
1144#define ODINFUNCTIONNODBG1(cRet,cName,t1,a1) \
1145 cRet ODIN_INTERNAL ODIN_##cName (t1 a1);\
1146 cRet WINAPI cName(t1 a1) \
1147 { \
1148 unsigned short sel = RestoreOS2FS(); \
1149 cRet rc = ODIN_##cName(a1); \
1150 SetFS(sel); \
1151 return rc; \
1152 } \
1153 \
1154 cRet ODIN_INTERNAL ODIN_##cName (t1 a1)
1155
1156#define ODINPROCEDURENODBG1(cName,t1,a1) \
1157 void ODIN_INTERNAL ODIN_##cName (t1 a1);\
1158 void WINAPI cName(t1 a1) \
1159 { \
1160 unsigned short sel = RestoreOS2FS(); \
1161 ODIN_##cName(a1); \
1162 SetFS(sel); \
1163 } \
1164 \
1165 void ODIN_INTERNAL ODIN_##cName (t1 a1)
1166
1167
1168/* ---------- 2 parameters ---------- */
1169#define ODINFUNCTIONNODBG2(cRet,cName,t1,a1,t2,a2) \
1170 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2); \
1171 cRet WINAPI cName(t1 a1,t2 a2) \
1172 { \
1173 unsigned short sel = RestoreOS2FS(); \
1174 cRet rc = ODIN_##cName(a1,a2); \
1175 SetFS(sel); \
1176 return rc; \
1177 } \
1178 \
1179 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2)
1180
1181#define ODINPROCEDURENODBG2(cName,t1,a1,t2,a2) \
1182 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2);\
1183 void WINAPI cName(t1 a1,t2 a2) \
1184 { \
1185 unsigned short sel = RestoreOS2FS(); \
1186 ODIN_##cName(a1,a2); \
1187 SetFS(sel); \
1188 } \
1189 \
1190 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2)
1191
1192
1193/* ---------- 3 parameters ---------- */
1194#define ODINFUNCTIONNODBG3(cRet,cName,t1,a1,t2,a2,t3,a3) \
1195 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3); \
1196 cRet WINAPI cName(t1 a1,t2 a2,t3 a3) \
1197 { \
1198 unsigned short sel = RestoreOS2FS(); \
1199 cRet rc = ODIN_##cName(a1,a2,a3); \
1200 SetFS(sel); \
1201 return rc; \
1202 } \
1203 \
1204 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3)
1205
1206#define ODINPROCEDURENODBG3(cName,t1,a1,t2,a2,t3,a3) \
1207 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3); \
1208 void WINAPI cName(t1 a1,t2 a2,t3 a3) \
1209 { \
1210 unsigned short sel = RestoreOS2FS(); \
1211 ODIN_##cName(a1,a2,a3); \
1212 SetFS(sel); \
1213 } \
1214 \
1215 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3)
1216
1217
1218/* ---------- 4 parameters ---------- */
1219#define ODINFUNCTIONNODBG4(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4) \
1220 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4); \
1221 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4) \
1222 { \
1223 unsigned short sel = RestoreOS2FS(); \
1224 cRet rc = ODIN_##cName(a1,a2,a3,a4); \
1225 SetFS(sel); \
1226 return rc; \
1227 } \
1228 \
1229 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4)
1230
1231#define ODINPROCEDURENODBG4(cName,t1,a1,t2,a2,t3,a3,t4,a4) \
1232 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4); \
1233 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4) \
1234 { \
1235 unsigned short sel = RestoreOS2FS(); \
1236 ODIN_##cName(a1,a2,a3,a4); \
1237 SetFS(sel); \
1238 } \
1239 \
1240 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4)
1241
1242
1243/* ---------- 5 parameters ---------- */
1244#define ODINFUNCTIONNODBG5(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5) \
1245 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5); \
1246 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5) \
1247 { \
1248 unsigned short sel = RestoreOS2FS(); \
1249 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5); \
1250 SetFS(sel); \
1251 return rc; \
1252 } \
1253 \
1254 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5)
1255
1256#define ODINPROCEDURENODBG5(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5) \
1257 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5); \
1258 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5) \
1259 { \
1260 unsigned short sel = RestoreOS2FS(); \
1261 ODIN_##cName(a1,a2,a3,a4,a5); \
1262 SetFS(sel); \
1263 } \
1264 \
1265 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5)
1266
1267
1268/* ---------- 6 parameters ---------- */
1269#define ODINFUNCTIONNODBG6(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6) \
1270 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6); \
1271 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6) \
1272 { \
1273 unsigned short sel = RestoreOS2FS(); \
1274 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6); \
1275 SetFS(sel); \
1276 return rc; \
1277 } \
1278 \
1279 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6)
1280
1281#define ODINPROCEDURENODBG6(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6) \
1282 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6); \
1283 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6) \
1284 { \
1285 unsigned short sel = RestoreOS2FS(); \
1286 ODIN_##cName(a1,a2,a3,a4,a5,a6); \
1287 SetFS(sel); \
1288 } \
1289 \
1290 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6)
1291
1292
1293/* ---------- 7 parameters ---------- */
1294#define ODINFUNCTIONNODBG7(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7) \
1295 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7); \
1296 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7) \
1297 { \
1298 unsigned short sel = RestoreOS2FS(); \
1299 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7); \
1300 SetFS(sel); \
1301 return rc; \
1302 } \
1303 \
1304 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7)
1305
1306#define ODINPROCEDURENODBG7(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7) \
1307 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7); \
1308 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7) \
1309 { \
1310 unsigned short sel = RestoreOS2FS(); \
1311 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7); \
1312 SetFS(sel); \
1313 } \
1314 \
1315 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7)
1316
1317
1318/* ---------- 8 parameters ---------- */
1319#define ODINFUNCTIONNODBG8(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8) \
1320 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8); \
1321 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8) \
1322 { \
1323 unsigned short sel = RestoreOS2FS(); \
1324 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8); \
1325 SetFS(sel); \
1326 return rc; \
1327 } \
1328 \
1329 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8)
1330
1331#define ODINPROCEDURENODBG8(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8) \
1332 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8); \
1333 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8) \
1334 { \
1335 unsigned short sel = RestoreOS2FS(); \
1336 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8); \
1337 SetFS(sel); \
1338 } \
1339 \
1340 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8)
1341
1342
1343/* ---------- 9 parameters ---------- */
1344#define ODINFUNCTIONNODBG9(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9) \
1345 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9); \
1346 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9) \
1347 { \
1348 unsigned short sel = RestoreOS2FS(); \
1349 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9); \
1350 SetFS(sel); \
1351 return rc; \
1352 } \
1353 \
1354 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9)
1355
1356#define ODINPROCEDURENODBG9(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9) \
1357 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9); \
1358 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9) \
1359 { \
1360 unsigned short sel = RestoreOS2FS(); \
1361 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9); \
1362 SetFS(sel); \
1363 } \
1364 \
1365 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9)
1366
1367
1368/* ---------- 10 parameters ---------- */
1369#define ODINFUNCTIONNODBG10(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10) \
1370 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10); \
1371 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10) \
1372 { \
1373 unsigned short sel = RestoreOS2FS(); \
1374 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10); \
1375 SetFS(sel); \
1376 return rc; \
1377 } \
1378 \
1379 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10)
1380
1381#define ODINPROCEDURENODBG10(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10) \
1382 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10); \
1383 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10) \
1384 { \
1385 unsigned short sel = RestoreOS2FS(); \
1386 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10); \
1387 SetFS(sel); \
1388 } \
1389 \
1390 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10)
1391
1392
1393/* ---------- 11 parameters ---------- */
1394#define ODINFUNCTIONNODBG11(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11) \
1395 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11); \
1396 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11) \
1397 { \
1398 unsigned short sel = RestoreOS2FS(); \
1399 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11); \
1400 SetFS(sel); \
1401 return rc; \
1402 } \
1403 \
1404 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11)
1405
1406#define ODINPROCEDURENODBG11(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11) \
1407 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11); \
1408 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11) \
1409 { \
1410 unsigned short sel = RestoreOS2FS(); \
1411 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11); \
1412 SetFS(sel); \
1413 } \
1414 \
1415 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11)
1416
1417
1418/* ---------- 12 parameters ---------- */
1419#define ODINFUNCTIONNODBG12(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12) \
1420 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12); \
1421 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12) \
1422 { \
1423 unsigned short sel = RestoreOS2FS(); \
1424 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12); \
1425 SetFS(sel); \
1426 return rc; \
1427 } \
1428 \
1429 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12)
1430
1431#define ODINPROCEDURENODBG12(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12) \
1432 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12); \
1433 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12) \
1434 { \
1435 unsigned short sel = RestoreOS2FS(); \
1436 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12); \
1437 SetFS(sel); \
1438 } \
1439 \
1440 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12)
1441
1442
[1696]1443/* ---------- 13 parameters ---------- */
1444#define ODINFUNCTIONNODBG13(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12,t13,a13) \
1445 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13); \
1446 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13) \
1447 { \
1448 unsigned short sel = RestoreOS2FS(); \
1449 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13); \
1450 SetFS(sel); \
1451 return rc; \
1452 } \
1453 \
1454 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13)
[1669]1455
[1696]1456#define ODINPROCEDURENODBG13(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12,t13,a13) \
1457 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13); \
1458 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13) \
1459 { \
1460 unsigned short sel = RestoreOS2FS(); \
1461 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13); \
1462 SetFS(sel); \
1463 } \
1464 \
1465 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13)
[1669]1466
[1696]1467
1468/* ---------- 14 parameters ---------- */
1469#define ODINFUNCTIONNODBG14(cRet,cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12,t13,a13,t14,a14) \
1470 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14); \
1471 cRet WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14) \
1472 { \
1473 unsigned short sel = RestoreOS2FS(); \
1474 cRet rc = ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14); \
1475 SetFS(sel); \
1476 return rc; \
1477 } \
1478 \
1479 cRet ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14)
1480
1481#define ODINPROCEDURENODBG14(cName,t1,a1,t2,a2,t3,a3,t4,a4,t5,a5,t6,a6,t7,a7,t8,a8,t9,a9,t10,a10,t11,a11,t12,a12,t13,a13,t14,a14) \
1482 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14); \
1483 void WINAPI cName(t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14) \
1484 { \
1485 unsigned short sel = RestoreOS2FS(); \
1486 ODIN_##cName(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14); \
1487 SetFS(sel); \
1488 } \
1489 \
1490 void ODIN_INTERNAL ODIN_##cName (t1 a1,t2 a2,t3 a3,t4 a4,t5 a5,t6 a6,t7 a7,t8 a8,t9 a9,t10 a10,t11 a11,t12 a12,t13 a13,t14 a14)
1491
1492
[473]1493#endif /* _ODINWRAP_H_ */
Note: See TracBrowser for help on using the repository browser.