Fix a memory leak

Memory from OS_Get_Locale should be free according to its doc
Oldes · Feb 25, 2014 · 253c64b · 253c64b
1 parent 3cdf63b
commit 253c64b
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/core/b-init.c b/src/core/b-init.c
@@ -822,21 +822,25 @@ static REBCNT Set_Option_Word(REBCHR *str, REBCNT field)
 	if (NZ(data = OS_GET_LOCALE(0))) {
 		val = Get_System(SYS_LOCALE, LOCALE_LANGUAGE);
 		Set_String(val, Copy_OS_Str(data, LEN_STR(data)));
+		OS_FREE(data);
 	}
 
 	if (NZ(data = OS_GET_LOCALE(1))) {
 		val = Get_System(SYS_LOCALE, LOCALE_LANGUAGE_P);
 		Set_String(val, Copy_OS_Str(data, LEN_STR(data)));
+		OS_FREE(data);
 	}
 
 	if (NZ(data = OS_GET_LOCALE(2))) {
 		val = Get_System(SYS_LOCALE, LOCALE_LOCALE);
 		Set_String(val, Copy_OS_Str(data, LEN_STR(data)));
+		OS_FREE(data);
 	}
 
 	if (NZ(data = OS_GET_LOCALE(3))) {
 		val = Get_System(SYS_LOCALE, LOCALE_LOCALE_P);
 		Set_String(val, Copy_OS_Str(data, LEN_STR(data)));
+		OS_FREE(data);
 	}
 }