Enhance main loop

.gitignore

@@ -32,3 +32,4 @@ package-lock.json
 node_modules
 !templates/**/node_modules
 .vscode/
+tests/**/bin/

project/BuildHashlink.xml

@@ -112,6 +112,7 @@
 	</files>
 
 	<files id="mysql">
+		<compilerflag value="-std=gnu17" unless="windows" />
 		<compilerflag value="-I${HASHLINK_PATH}/src" />
 		<compilerflag value="-I/usr/local/include" if="mac"/>
 

project/README.md

@@ -15,15 +15,21 @@ This directory contains two categories of code.
 - Windows requires [Visual Studio C++ components](https://visualstudio.microsoft.com/vs/features/cplusplus/).
 - Mac requires [Xcode](https://developer.apple.com/xcode/).
 - Linux requires several packages (names may vary per distro).
+   - Ubunutu requires the following packages.
 
-   ```bash
-   sudo apt install libgl1-mesa-dev libglu1-mesa-dev g++ g++-multilib gcc-multilib libasound2-dev libx11-dev libxext-dev libxi-dev libxrandr-dev libxinerama-dev libpulse-dev
-   ```
-- Raspberry Pi OS requires a slightly different set of packages.
+      ```bash
+      sudo apt install libgl1-mesa-dev libglu1-mesa-dev g++ g++-multilib gcc-multilib libasound2-dev libx11-dev libxext-dev libxi-dev libxrandr-dev libxinerama-dev libpulse-dev
+      ```
+   - While Raspberry Pi OS also uses `apt`, it requires a slightly different set of packages.
 
-   ```bash
-   sudo apt install libgl1-mesa-dev libglu1-mesa-dev g++ libasound2-dev libx11-dev libxext-dev libxi-dev libxrandr-dev libxinerama-dev libpulse-dev libxcursor-dev libdbus-1-dev libdrm-dev libgbm-dev libudev-dev
-   ```
+      ```bash
+      sudo apt install libgl1-mesa-dev libglu1-mesa-dev g++ libasound2-dev libx11-dev libxext-dev libxi-dev libxrandr-dev libxinerama-dev libpulse-dev libxcursor-dev libdbus-1-dev libdrm-dev libgbm-dev libudev-dev
+      ```
+   - Fedora requires the following packages.
+
+      ```bash
+      sudo dnf install g++ glibc-devel.x86_64 libstdc++-devel.x86_64 glibc-devel.i686 libstdc++-devel.i686 alsa-lib-devel pulseaudio-libs-devel libX11-devel libXi-devel libXrandr-devel libglvnd-devel
+      ```
 - Building HashLink requires [additional packages](https://github.com/HaxeFoundation/hashlink#readme).
 
 ### Rebuilding

project/include/app/Application.h

@@ -20,7 +20,9 @@ namespace lime {
 			virtual int Exec () = 0;
 			virtual void Init () = 0;
 			virtual int Quit () = 0;
+			virtual void SetMainLoop (int profile, double frameRate, int timePrecision, int busyWait, int uncapMode) { SetFrameRate (frameRate); }
 			virtual void SetFrameRate (double frameRate) = 0;
+			virtual void SetVSyncMode (int vsyncMode) {}
 			virtual bool Update () = 0;
 
 
@@ -33,4 +35,4 @@ namespace lime {
 }
 
 
-#endif
+#endif

project/include/ui/Window.h

@@ -63,9 +63,12 @@ namespace lime {
 			virtual void SetTextInputEnabled (bool enable) = 0;
 			virtual void SetTextInputRect (Rectangle *rect) = 0;
 			virtual const char* SetTitle (const char* title) = 0;
+			virtual void SetVSyncMode (int vsyncMode) {}
 			virtual bool SetVisible (bool visible) = 0;
 			virtual bool SetAlwaysOnTop (bool alwaysOnTop) = 0;
 			virtual void WarpMouse (int x, int y) = 0;
+			virtual int GetVSyncInterval () const { return 0; }
+			virtual double GetRefreshRate () const { return 60.0; }
 
 			Application* currentApplication;
 			int flags;
@@ -95,8 +98,11 @@ namespace lime {
 		WINDOW_FLAG_MINIMIZED = 0x00002000,
 		WINDOW_FLAG_MAXIMIZED = 0x00004000,
 		WINDOW_FLAG_ALWAYS_ON_TOP = 0x00008000,
-		WINDOW_FLAG_COLOR_DEPTH_32_BIT = 0x00010000
-
+		WINDOW_FLAG_COLOR_DEPTH_32_BIT = 0x00010000,
+		WINDOW_FLAG_SKIP_TASKBAR = 0x00020000,
+		WINDOW_FLAG_UTILITY = 0x00040000,
+		WINDOW_FLAG_POPUP_MENU = 0x00080000,
+		WINDOW_FLAG_TOOLTIP = 0x00100000
 	};
 
 }

project/src/ExternalInterface.cpp

@@ -365,6 +365,38 @@ namespace lime {
 	}
 
 
+	void lime_application_set_main_loop (value application, int profile, double frameRate, int timePrecision, int busyWait, int uncapMode) {
+
+		Application* app = (Application*)val_data (application);
+		app->SetMainLoop (profile, frameRate, timePrecision, busyWait, uncapMode);
+
+	}
+
+
+	HL_PRIM void HL_NAME(hl_application_set_main_loop) (HL_CFFIPointer* application, int profile, double frameRate, int timePrecision, int busyWait, int uncapMode) {
+
+		Application* app = (Application*)application->ptr;
+		app->SetMainLoop (profile, frameRate, timePrecision, busyWait, uncapMode);
+
+	}
+
+
+	void lime_application_set_vsync_mode (value application, int vsyncMode) {
+
+		Application* app = (Application*)val_data (application);
+		app->SetVSyncMode (vsyncMode);
+
+	}
+
+
+	HL_PRIM void HL_NAME(hl_application_set_vsync_mode) (HL_CFFIPointer* application, int vsyncMode) {
+
+		Application* app = (Application*)application->ptr;
+		app->SetVSyncMode (vsyncMode);
+
+	}
+
+
 	bool lime_application_update (value application) {
 
 		Application* app = (Application*)val_data (application);
@@ -4079,7 +4111,9 @@ namespace lime {
 	DEFINE_PRIME1 (lime_application_exec);
 	DEFINE_PRIME1v (lime_application_init);
 	DEFINE_PRIME1 (lime_application_quit);
+	DEFINE_PRIME6v (lime_application_set_main_loop);
 	DEFINE_PRIME2v (lime_application_set_frame_rate);
+	DEFINE_PRIME2v (lime_application_set_vsync_mode);
 	DEFINE_PRIME1 (lime_application_update);
 	DEFINE_PRIME2 (lime_audio_load);
 	DEFINE_PRIME2 (lime_audio_load_bytes);
@@ -4276,6 +4310,8 @@ namespace lime {
 	DEFINE_HL_PRIM (_VOID, hl_application_init, _TCFFIPOINTER);
 	DEFINE_HL_PRIM (_I32, hl_application_quit, _TCFFIPOINTER);
 	DEFINE_HL_PRIM (_VOID, hl_application_set_frame_rate, _TCFFIPOINTER _F64);
+	DEFINE_HL_PRIM (_VOID, hl_application_set_main_loop, _TCFFIPOINTER _I32 _F64 _I32 _I32 _I32);
+	DEFINE_HL_PRIM (_VOID, hl_application_set_vsync_mode, _TCFFIPOINTER _I32);
 	DEFINE_HL_PRIM (_BOOL, hl_application_update, _TCFFIPOINTER);
 	DEFINE_HL_PRIM (_TAUDIOBUFFER, hl_audio_load_bytes, _TBYTES _TAUDIOBUFFER);
 	DEFINE_HL_PRIM (_TAUDIOBUFFER, hl_audio_load_file, _STRING _TAUDIOBUFFER);