Skip to content

Commit a5e0478

Browse files
FIX: Change LineEndings to \n
1 parent 19a2176 commit a5e0478

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

47 files changed

+25136
-25136
lines changed

units/ctypes.inc

Lines changed: 203 additions & 203 deletions
Large diffs are not rendered by default.

units/jedi.inc

Lines changed: 516 additions & 516 deletions
Large diffs are not rendered by default.

units/sdl.inc

Lines changed: 114 additions & 114 deletions
Original file line numberDiff line numberDiff line change
@@ -1,114 +1,114 @@
1-
// based on "sdl.h"
2-
3-
type
4-
PPSDL_Init = ^PSDL_Init;
5-
PSDL_Init = ^TSDL_Init;
6-
TSDL_Init = type cuint32;
7-
8-
const
9-
SDL_INIT_TIMER = TSDL_Init($00000001);
10-
{$EXTERNALSYM SDL_INIT_TIMER}
11-
SDL_INIT_AUDIO = TSDL_Init($00000010);
12-
{$EXTERNALSYM SDL_INIT_AUDIO}
13-
SDL_INIT_VIDEO = TSDL_Init($00000020); // SDL_INIT_VIDEO implies SDL_INIT_EVENTS
14-
{$EXTERNALSYM SDL_INIT_VIDEO}
15-
SDL_INIT_JOYSTICK = TSDL_Init($00000200); // SDL_INIT_JOYSTICK implies SDL_INIT_EVENTS
16-
{$EXTERNALSYM SDL_INIT_JOYSTICK}
17-
SDL_INIT_HAPTIC = TSDL_Init($00001000);
18-
{$EXTERNALSYM SDL_INIT_HAPTIC}
19-
SDL_INIT_GAMECONTROLLER = TSDL_Init($00002000); //turn on game controller also implicitly does JOYSTICK
20-
{$EXTERNALSYM SDL_INIT_GAMECONTROLLER} // SDL_INIT_GAMECONTROLLER implies SDL_INIT_JOYSTICK
21-
SDL_INIT_EVENTS = TSDL_Init($00004000);
22-
{$EXTERNALSYM SDL_INIT_EVENTS}
23-
SDL_INIT_SENSOR = TSDL_Init($00008000);
24-
{$EXTERNALSYM SDL_INIT_SENSOR}
25-
SDL_INIT_NOPARACHUTE = TSDL_Init($00100000); //Don't catch fatal signals
26-
{$EXTERNALSYM SDL_INIT_NOPARACHUTE} // compatibility; this flag is ignored.
27-
SDL_INIT_EVERYTHING = TSDL_Init(
28-
SDL_INIT_TIMER or
29-
SDL_INIT_AUDIO or
30-
SDL_INIT_VIDEO or
31-
SDL_INIT_EVENTS or
32-
SDL_INIT_JOYSTICK or
33-
SDL_INIT_HAPTIC or
34-
SDL_INIT_GAMECONTROLLER or
35-
SDL_INIT_SENSOR
36-
);
37-
{$EXTERNALSYM SDL_INIT_EVERYTHING}
38-
39-
{**
40-
* This function initializes the subsystems specified by flags
41-
* Unless the SDL_INIT_NOPARACHUTE flag is set, it will install cleanup
42-
* signal handlers for some commonly ignored fatal signals (like SIGSEGV).
43-
*}
44-
{$ifdef SDL_DYNAMIC_LINKING}
45-
Type
46-
TSDL_Init_fun = function(flags: TSDL_Init): cint; cdecl;
47-
Var
48-
SDL_Init : TSDL_Init_fun = Nil;
49-
{$else}
50-
51-
function SDL_Init(flags: TSDL_Init): cint; cdecl;
52-
external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_Init' {$ENDIF} {$ENDIF};
53-
{$endif}
54-
55-
{**
56-
* This function initializes specific SDL subsystems
57-
*}
58-
{$ifdef SDL_DYNAMIC_LINKING}
59-
Type
60-
TSDL_InitSubSystem_fun = function(flags: TSDL_Init): cint; cdecl;
61-
Var
62-
SDL_InitSubSystem : TSDL_InitSubSystem_fun = Nil;
63-
{$else}
64-
65-
function SDL_InitSubSystem(flags: TSDL_Init): cint; cdecl;
66-
external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_InitSubSystem' {$ENDIF} {$ENDIF};
67-
{$endif}
68-
69-
{**
70-
* This function cleans up specific SDL subsystems
71-
*}
72-
{$ifdef SDL_DYNAMIC_LINKING}
73-
Type
74-
TSDL_QuitSubSystem_proc = procedure(flags: TSDL_Init); cdecl;
75-
Var
76-
SDL_QuitSubSystem : TSDL_QuitSubSystem_proc = Nil;
77-
{$else}
78-
79-
procedure SDL_QuitSubSystem(flags: TSDL_Init); cdecl;
80-
external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_QuitSubSystem' {$ENDIF} {$ENDIF};
81-
{$endif}
82-
83-
{**
84-
* This function returns a mask of the specified subsystems which have
85-
* previously been initialized.
86-
*
87-
* If flags is 0, it returns a mask of all initialized subsystems.
88-
*}
89-
{$ifdef SDL_DYNAMIC_LINKING}
90-
Type
91-
TSDL_WasInit_fun = function(flags: TSDL_Init): cuint32; cdecl;
92-
Var
93-
SDL_WasInit : TSDL_WasInit_fun = Nil;
94-
{$else}
95-
96-
function SDL_WasInit(flags: TSDL_Init): cuint32; cdecl;
97-
external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_WasInit' {$ENDIF} {$ENDIF};
98-
{$endif}
99-
100-
{**
101-
* This function cleans up all initialized subsystems. You should
102-
* call it upon all exit conditions.
103-
*}
104-
{$ifdef SDL_DYNAMIC_LINKING}
105-
Type
106-
TSDL_Quit_proc = procedure(); cdecl;
107-
Var
108-
SDL_Quit : TSDL_Quit_proc = Nil;
109-
{$else}
110-
111-
procedure SDL_Quit(); cdecl;
112-
external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_Quit' {$ENDIF} {$ENDIF};
113-
{$endif}
114-
1+
// based on "sdl.h"
2+
3+
type
4+
PPSDL_Init = ^PSDL_Init;
5+
PSDL_Init = ^TSDL_Init;
6+
TSDL_Init = type cuint32;
7+
8+
const
9+
SDL_INIT_TIMER = TSDL_Init($00000001);
10+
{$EXTERNALSYM SDL_INIT_TIMER}
11+
SDL_INIT_AUDIO = TSDL_Init($00000010);
12+
{$EXTERNALSYM SDL_INIT_AUDIO}
13+
SDL_INIT_VIDEO = TSDL_Init($00000020); // SDL_INIT_VIDEO implies SDL_INIT_EVENTS
14+
{$EXTERNALSYM SDL_INIT_VIDEO}
15+
SDL_INIT_JOYSTICK = TSDL_Init($00000200); // SDL_INIT_JOYSTICK implies SDL_INIT_EVENTS
16+
{$EXTERNALSYM SDL_INIT_JOYSTICK}
17+
SDL_INIT_HAPTIC = TSDL_Init($00001000);
18+
{$EXTERNALSYM SDL_INIT_HAPTIC}
19+
SDL_INIT_GAMECONTROLLER = TSDL_Init($00002000); //turn on game controller also implicitly does JOYSTICK
20+
{$EXTERNALSYM SDL_INIT_GAMECONTROLLER} // SDL_INIT_GAMECONTROLLER implies SDL_INIT_JOYSTICK
21+
SDL_INIT_EVENTS = TSDL_Init($00004000);
22+
{$EXTERNALSYM SDL_INIT_EVENTS}
23+
SDL_INIT_SENSOR = TSDL_Init($00008000);
24+
{$EXTERNALSYM SDL_INIT_SENSOR}
25+
SDL_INIT_NOPARACHUTE = TSDL_Init($00100000); //Don't catch fatal signals
26+
{$EXTERNALSYM SDL_INIT_NOPARACHUTE} // compatibility; this flag is ignored.
27+
SDL_INIT_EVERYTHING = TSDL_Init(
28+
SDL_INIT_TIMER or
29+
SDL_INIT_AUDIO or
30+
SDL_INIT_VIDEO or
31+
SDL_INIT_EVENTS or
32+
SDL_INIT_JOYSTICK or
33+
SDL_INIT_HAPTIC or
34+
SDL_INIT_GAMECONTROLLER or
35+
SDL_INIT_SENSOR
36+
);
37+
{$EXTERNALSYM SDL_INIT_EVERYTHING}
38+
39+
{**
40+
* This function initializes the subsystems specified by flags
41+
* Unless the SDL_INIT_NOPARACHUTE flag is set, it will install cleanup
42+
* signal handlers for some commonly ignored fatal signals (like SIGSEGV).
43+
*}
44+
{$ifdef SDL_DYNAMIC_LINKING}
45+
Type
46+
TSDL_Init_fun = function(flags: TSDL_Init): cint; cdecl;
47+
Var
48+
SDL_Init : TSDL_Init_fun = Nil;
49+
{$else}
50+
51+
function SDL_Init(flags: TSDL_Init): cint; cdecl;
52+
external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_Init' {$ENDIF} {$ENDIF};
53+
{$endif}
54+
55+
{**
56+
* This function initializes specific SDL subsystems
57+
*}
58+
{$ifdef SDL_DYNAMIC_LINKING}
59+
Type
60+
TSDL_InitSubSystem_fun = function(flags: TSDL_Init): cint; cdecl;
61+
Var
62+
SDL_InitSubSystem : TSDL_InitSubSystem_fun = Nil;
63+
{$else}
64+
65+
function SDL_InitSubSystem(flags: TSDL_Init): cint; cdecl;
66+
external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_InitSubSystem' {$ENDIF} {$ENDIF};
67+
{$endif}
68+
69+
{**
70+
* This function cleans up specific SDL subsystems
71+
*}
72+
{$ifdef SDL_DYNAMIC_LINKING}
73+
Type
74+
TSDL_QuitSubSystem_proc = procedure(flags: TSDL_Init); cdecl;
75+
Var
76+
SDL_QuitSubSystem : TSDL_QuitSubSystem_proc = Nil;
77+
{$else}
78+
79+
procedure SDL_QuitSubSystem(flags: TSDL_Init); cdecl;
80+
external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_QuitSubSystem' {$ENDIF} {$ENDIF};
81+
{$endif}
82+
83+
{**
84+
* This function returns a mask of the specified subsystems which have
85+
* previously been initialized.
86+
*
87+
* If flags is 0, it returns a mask of all initialized subsystems.
88+
*}
89+
{$ifdef SDL_DYNAMIC_LINKING}
90+
Type
91+
TSDL_WasInit_fun = function(flags: TSDL_Init): cuint32; cdecl;
92+
Var
93+
SDL_WasInit : TSDL_WasInit_fun = Nil;
94+
{$else}
95+
96+
function SDL_WasInit(flags: TSDL_Init): cuint32; cdecl;
97+
external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_WasInit' {$ENDIF} {$ENDIF};
98+
{$endif}
99+
100+
{**
101+
* This function cleans up all initialized subsystems. You should
102+
* call it upon all exit conditions.
103+
*}
104+
{$ifdef SDL_DYNAMIC_LINKING}
105+
Type
106+
TSDL_Quit_proc = procedure(); cdecl;
107+
Var
108+
SDL_Quit : TSDL_Quit_proc = Nil;
109+
{$else}
110+
111+
procedure SDL_Quit(); cdecl;
112+
external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_Quit' {$ENDIF} {$ENDIF};
113+
{$endif}
114+

0 commit comments

Comments
 (0)