Set sHatariHomeDir to retroarch\saves directory for retro core

src/paths.c

@@ -17,6 +17,10 @@ const char Paths_fileid[] = "Hatari paths.c";
 #include "paths.h"
 #include "str.h"
 
+#ifdef LIBRETRO
+extern const char *retro_save_directory;
+#endif
+
 #if defined(WIN32) && !defined(mkdir)
 #define mkdir(name,mode) mkdir(name)
 #endif  /* WIN32 */
@@ -228,6 +232,22 @@ static void Paths_InitHomeDirs(void)
 				strcat(sUserHomeDir, psHome);
 		}
 	}
+#endif
+#if defined(LIBRETRO)
+	if (retro_save_directory && retro_save_directory[0])
+	{
+		sUserHomeDir = Str_Dup(retro_save_directory);
+		sHatariHomeDir = Str_Dup(retro_save_directory);
+
+		if (!File_DirExists(sHatariHomeDir))
+		{
+			if (mkdir(sHatariHomeDir, 0750) != 0)
+			{
+				perror("Failed to create libretro save directory");
+			}
+		}
+		return;
+	}
 #endif
 	if (!sUserHomeDir)
 	{

src/retro/main_retro.h

@@ -7,6 +7,7 @@
 
 extern bool has_cpu_config_changed;
 extern const char *retro_system_directory;
+extern const char *retro_save_directory;
 extern retro_environment_t environment_cb;
 extern retro_video_refresh_t video_refresh_cb;
 extern retro_input_state_t input_state_cb;