Add SDL_platform.inc

Author: Free-Pascal-meets-SDL-Website

units/SDL3.pas

@@ -84,6 +84,7 @@ interface
 {$I SDL_hints.inc}                        // 3.2.0
 {$I SDL_misc.inc}                         // 3.2.0
 {$I SDL_stdinc.inc}                       // 3.1.6-prev (unfinished)
+{$I SDL_platform.inc}                     // 3.2.0
 {$I SDL_loadso.inc}                       // 3.2.0
 {$I SDL_rect.inc}                         // 3.1.6-prev
 {$I SDL_properties.inc}                   // 3.1.6-prev

units/SDL_platform.inc

@@ -0,0 +1,34 @@
+{
+  This file is part of:
+
+    SDL3 for Pascal
+    (https://github.com/PascalGameDevelopment/SDL3-for-Pascal)
+    SPDX-License-Identifier: Zlib
+}
+
+{*
+ * # CategoryPlatform
+ *
+ * SDL provides a means to identify the app's platform, both at compile time
+ * and runtime.
+  }
+
+{*
+ * Get the name of the platform.
+ *
+ * Here are the names returned for some (but not all) supported platforms:
+ *
+ * - "Windows"
+ * - "macOS"
+ * - "Linux"
+ * - "iOS"
+ * - "Android"
+ *
+ * \returns the name of the platform. If the correct platform name is not
+ *          available, returns a string beginning with the text "Unknown".
+ *
+ * \since This function is available since SDL 3.2.0.
+  }
+function SDL_GetPlatform: PAnsiChar; cdecl;
+  external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_GetPlatform' {$ENDIF} {$ENDIF};
+