shithub: femtolisp

Download patch

ref: 0d5459f1f08ef367cd8849fc733b64bbdd9fd552
parent: 3f168e51ab3000409905edd2e2b6e1ba6cd60aa5
author: Sigrid Solveig Haflínudóttir <sigrid@ftrv.se>
date: Sat Dec 28 20:17:54 EST 2024

MEM_FREE on nil pointer is fine

--- a/flmain.c
+++ b/flmain.c
@@ -65,8 +65,7 @@
 	int r = 1;
 	FL_TRY_EXTERN{
 		if(fl_load_system_image(f) == 0){
-			if(unpacked != nil)
-				MEM_FREE(unpacked);
+			MEM_FREE(unpacked);
 			ios_close(s);
 			fl_applyn(1, symbol_value(symbol("__start", false)), argv_list(argc, argv));
 			r = 0;