Skip to content

Commit 8937cbd

Browse files
Fix: typed aliases
1 parent 5134075 commit 8937cbd

File tree

1 file changed

+11
-11
lines changed

1 file changed

+11
-11
lines changed

units/SDL_video.inc

Lines changed: 11 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -45,7 +45,7 @@
4545
type
4646
PPSDL_DisplayID = ^PSDL_DisplayID;
4747
PSDL_DisplayID = ^TSDL_DisplayID;
48-
TSDL_DisplayID = cuint32;
48+
TSDL_DisplayID = type cuint32;
4949

5050
{*
5151
* This is a unique ID for a window.
@@ -56,7 +56,7 @@ type
5656
}
5757
PPSDL_WindowID = ^PSDL_WindowID;
5858
PSDL_WindowID = ^TSDL_WindowID;
59-
TSDL_WindowID = cuint32;
59+
TSDL_WindowID = type cuint32;
6060

6161
{ Global video properties... }
6262

@@ -85,7 +85,7 @@ const
8585
type
8686
PPSDL_SystemTheme = ^PSDL_SystemTheme;
8787
PSDL_SystemTheme = ^TSDL_SystemTheme;
88-
TSDL_SystemTheme = Integer;
88+
TSDL_SystemTheme = type Integer;
8989
const
9090
SDL_SYSTEM_THEME_UNKNOWN = TSDL_SystemTheme(0); {*< Unknown system theme }
9191
SDL_SYSTEM_THEME_LIGHT = TSDL_SystemTheme(1); {*< Light colored system theme }
@@ -129,7 +129,7 @@ type
129129
}
130130
PPSDL_DisplayOrientation = ^PSDL_DisplayOrientation;
131131
PSDL_DisplayOrientation = ^TSDL_DisplayOrientation;
132-
TSDL_DisplayOrientation = Integer;
132+
TSDL_DisplayOrientation = type Integer;
133133
const
134134
SDL_ORIENTATION_UNKNOWN = TSDL_DisplayOrientation(0); {*< The display orientation can't be determined }
135135
SDL_ORIENTATION_LANDSCAPE = TSDL_DisplayOrientation(1); {*< The display is in landscape mode, with the right side up, relative to portrait mode }
@@ -163,7 +163,7 @@ type
163163
type
164164
PPSDL_WindowFlags = ^PSDL_WindowFlags;
165165
PSDL_WindowFlags = ^TSDL_WindowFlags;
166-
TSDL_WindowFlags = cuint64;
166+
TSDL_WindowFlags = type cuint64;
167167

168168
const
169169
SDL_WINDOW_FULLSCREEN = TSDL_WindowFlags($0000000000000001); {*< window is in fullscreen mode }
@@ -221,7 +221,7 @@ function SDL_WINDOWPOS_ISCENTERED(X: Integer): Boolean;
221221
type
222222
PPSDL_FlashOperation = ^PSDL_FlashOperation;
223223
PSDL_FlashOperation = ^TSDL_FlashOperation;
224-
TSDL_FlashOperation = Integer;
224+
TSDL_FlashOperation = type Integer;
225225
const
226226
SDL_FLASH_CANCEL = TSDL_FlashOperation(0); {*< Cancel any window flash state }
227227
SDL_FLASH_BRIEFLY = TSDL_FlashOperation(1); {*< Flash the window briefly to get attention }
@@ -246,23 +246,23 @@ type
246246
}
247247
PPSDL_EGLDisplay = ^PSDL_EGLDisplay;
248248
PSDL_EGLDisplay = ^TSDL_EGLDisplay;
249-
TSDL_EGLDisplay = pointer;
249+
TSDL_EGLDisplay = type Pointer;
250250

251251
PPSDL_EGLConfig = ^PSDL_EGLConfig;
252252
PSDL_EGLConfig = ^TSDL_EGLConfig;
253-
TSDL_EGLConfig = pointer;
253+
TSDL_EGLConfig = type Pointer;
254254

255255
PPSDL_EGLSurface = ^PSDL_EGLSurface;
256256
PSDL_EGLSurface = ^TSDL_EGLSurface;
257-
TSDL_EGLSurface = pointer;
257+
TSDL_EGLSurface = type Pointer;
258258

259259
PPSDL_EGLAttrib = ^PSDL_EGLAttrib;
260260
PSDL_EGLAttrib = ^TSDL_EGLAttrib;
261-
TSDL_EGLAttrib = cintptr_t;
261+
TSDL_EGLAttrib = type cintptr_t;
262262

263263
PPSDL_EGLint = ^PSDL_EGLint;
264264
PSDL_EGLint = ^TSDL_EGLint;
265-
TSDL_EGLint = cint;
265+
TSDL_EGLint = type cint;
266266

267267
{*
268268
* EGL platform attribute initialization callback.

0 commit comments

Comments
 (0)