README_OS4.md

@@ -33,11 +33,12 @@ SetEnv SAVE HOME "Sys:home/"
 
 
 ## TODO list
+- Free Gfx memory leak
 - Make the application aknowledge of the executable file name. Now it works 
 only with the filename `lite`
 - Fix A1222 compatibility where it runs fine, until the user resize the 
 window
-- Fix loading a folder from terminal using dot (.) as path.
+- Fix loading a folder from terminal using the dot (.) as path.
 - Fix the resolution of the fullscreen mode
 - Find a way to open it in a separated screen, if possible
 - Add menu items
@@ -49,11 +50,6 @@ for low end machines
 
 # Changelog
 
-## [1.16.12.4] - 2021-12-31
-### Fixed
-- Fixed the Gfx memory leak. Now LiteXL frees the reserved memory from the
-  gfx card.
-
 ## [1.16.12.3] - 2021-12-29
 ### Changed
 - Compiled with an experimental version of the latest Anti-Grain Geometry

data/core/init.lua

@@ -66,10 +66,13 @@ end
 
 
 function core.set_project_dir(new_dir, change_project_fn)
+-- print("LUA DBG: before pcall " .. tostring(new_dir))
   local chdir_ok = pcall(system.chdir, new_dir)
+-- print("LUA DBG: after pcall " .. tostring(chdir_ok))
   if chdir_ok then
     if change_project_fn then change_project_fn() end
     core.project_dir = normalize_path(new_dir)
+	-- print("LUA DBG: after normalize_path " .. tostring(new_dir) .. "\n" .. tostring(core.project_dir))
     core.project_directories = {}
     core.add_project_directory(new_dir)
     core.project_files = {}
@@ -503,6 +506,7 @@ function core.init()
       update_recents_project("remove", project_dir)
     end
     project_dir_abs = system.absolute_path(".")
+	-- print("LUA DBG: project_dir_abs " .. tostring(project_dir_abs))
     if not core.set_project_dir(project_dir_abs) then
       system.show_fatal_error("Lite XL internal error", "cannot set project directory to cwd")
       os.exit(1)

src/main.c

@@ -80,14 +80,6 @@ static void get_exe_filename(char *buf, int sz) {
 }
 
 
-static void clearQuit(void)
-{
-  rencache_invalidate();
-	ren_free_window_resources();
-	SDL_Quit();
-}
-
-
 static void init_window_icon(void) {
 #ifndef _WIN32
   #include "../icon.inl"
@@ -129,7 +121,7 @@ int main(int argc, char **argv) {
   SDL_Init(SDL_INIT_VIDEO | SDL_INIT_EVENTS);
   SDL_EnableScreenSaver();
   SDL_EventState(SDL_DROPFILE, SDL_ENABLE);
-  atexit(clearQuit);
+  atexit(SDL_Quit);
 
 #ifdef SDL_HINT_VIDEO_X11_NET_WM_BYPASS_COMPOSITOR /* Available since 2.0.8 */
   SDL_SetHint(SDL_HINT_VIDEO_X11_NET_WM_BYPASS_COMPOSITOR, "0");
@@ -166,6 +158,7 @@ init_lua:
 
   lua_pushnumber(L, get_scale());
   lua_setglobal(L, "SCALE");
+
   char exename[2048];
   get_exe_filename(exename, sizeof(exename));
   lua_pushstring(L, exename);
@@ -175,6 +168,7 @@ init_lua:
   set_macos_bundle_resources(L);
   enable_momentum_scroll();
 #endif
+
   const char *init_lite_code = \
     "local core\n"
     "xpcall(function()\n"
@@ -219,6 +213,7 @@ init_lua:
     rencache_invalidate();
     goto init_lua;
   }
+
   lua_close(L);
   ren_free_window_resources();
   SDL_Quit();

src/platform/amigaos4.h

@@ -4,7 +4,7 @@
 #include <proto/dos.h>
 #include <proto/exec.h>
 
-#define VSTRING     "Lite XL 1.16.12.4 (31.12.2021)"
+#define VSTRING     "Lite XL 1.16.12.3 (29.12.2021)"
 #define VERSTAG     "\0$VER: " VSTRING
 
 static CONST_STRPTR stack USED = "$STACK:102400";