forked from bgbennyboy/Monkey-Island-Explorer
-
Notifications
You must be signed in to change notification settings - Fork 0
/
DirectX.inc
133 lines (108 loc) · 3.2 KB
/
DirectX.inc
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
{******************************************************************************}
{ }
{ The contents of this file are subject to the Mozilla Public License Version }
{ 1.1 (the "License"); you may not use this file except in compliance with the }
{ License. You may obtain a copy of the License at http://www.mozilla.org/MPL/ }
{ }
{ Software distributed under the License is distributed on an "AS IS" basis, }
{ WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for }
{ the specific language governing rights and limitations under the License. }
{ }
{ The Original Code is DirectX.inc. }
{ }
{******************************************************************************}
{$IFNDEF __TMT__}
{$IFNDEF FPC}
// *** Borland compilers support ***
{$INCLUDE Jedi.inc}
{$DEFINE BORLAND}
{$DEFINE TYPE_IDENTITY}
{$DEFINE SUPPORTS_EXCEPTIONS}
{$IFDEF COMPILER6_UP}
{$DEFINE SUPPORTS_EXPL_ENUMS} // Enumerated types with explicitly assigned ordinality
{$IFNDEF BCB6_UP}
// C++Builder6 hack: Delphi 6-7 compilers have bugged .HPP generation for
// enums in some cases (and D6 compiler is included with BCB6)
{$DEFINE SUPPORTS_EXPL_ENUMS_except_BCB6}
{$ENDIF}
{$ENDIF}
// Additional settings
{$BOOLEVAL OFF}
{$MINENUMSIZE 4}
{$ALIGN ON}
{$IFDEF COMPILER7_UP}
{$WARN UNSAFE_CODE OFF}
{$WARN UNSAFE_TYPE OFF}
{$WARN UNSAFE_CAST OFF}
{$ENDIF}
{$IFDEF COMPILER9_UP}
{$IFDEF DEBUG}
{$INLINE OFF}
{$ELSE}
{$INLINE ON}
{$ENDIF}
{$ENDIF}
{$ELSE}
// *** FreePascal compiler support ***
{$INCLUDE Jedi.inc}
{$APPTYPE GUI}
// Additional settings
{$H+} // Long Strings
{$BOOLEVAL OFF}
{$MINENUMSIZE 4}
{$ALIGN ON}
{$PACKRECORDS 8}
{$INLINE ON}
{$UNDEF TYPE_IDENTITY}
{$DEFINE SUPPORTS_EXCEPTIONS}
{$DEFINE SUPPORTS_INLINE}
{$DEFINE COMPILER5_UP} // Specially for DirectDraw.pas
{$ENDIF}
{$ELSE}
// *** TMT Pascal compiler support ***
{.$I TMT.inc}
// TMT compiler support
{$IFNDEF __TMT__}
TMT pascal compiler required here
{$ENDIF}
// ADD IFOPT for TMT
{$DEFINE TMT}
{$IFDEF __WIN32__}
{$DEFINE WIN32}
{$ENDIF}
{$IFDEF __VER5__}
{$DEFINE TMT5}
{$DEFINE TMT5_UP}
{$DEFINE TMT4_UP}
{$DEFINE TMT3_UP}
{$ENDIF}
{$IFDEF __VER4__}
{$DEFINE TMT4}
{$DEFINE TMT4_UP}
{$DEFINE TMT3_UP}
{$ENDIF}
{$IFDEF __VER3__}
{$DEFINE TMT3}
{$DEFINE TMT3_UP}
{$ENDIF}
{$IFDEF TMT4_UP}
{$DEFINE SUPPORTS_INTERFACE}
{$ENDIF}
// Additional settings
{$A+} // Word alignment data
{$OA+} // Objects and structures align
{$Z4} // Set minimum size of enumerated type to 4
{$ENDIF}
// By default use most recent DirectX sub-version
{$IFNDEF DX81}
{$IFNDEF DX80}
{$DEFINE DX81}
{$ENDIF}
{$ENDIF}
{$IFNDEF DX92}
{$IFNDEF DX91}
{$IFNDEF DX90}
{$DEFINE DX92}
{$ENDIF}
{$ENDIF}
{$ENDIF}