FIX: ATRONIX: Memory from OS_Get_Locale should be free according to its doc

Oldes · Oldes · commit 3725a33ba087 · 2019-01-25T22:08:04.000+01:00
(cherry picked from commit 253c64b)
diff --git a/src/core/b-init.c b/src/core/b-init.c
@@ -835,21 +835,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, (REBINT)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, (REBINT)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, (REBINT)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, (REBINT)LEN_STR(data)));
+		OS_FREE(data);
 	}
 }
 

Original file line number	Diff line number	Diff line change
`@@ -835,21 +835,25 @@ static REBCNT Set_Option_Word(REBCHR *str, REBCNT field)`
`835`	`835`	`if (NZ(data = OS_GET_LOCALE(0))) {`
`836`	`836`	`val = Get_System(SYS_LOCALE, LOCALE_LANGUAGE);`
`837`	`837`	`Set_String(val, Copy_OS_Str(data, (REBINT)LEN_STR(data)));`
	`838`	`+ OS_FREE(data);`
`838`	`839`	`}`
`839`	`840`
`840`	`841`	`if (NZ(data = OS_GET_LOCALE(1))) {`
`841`	`842`	`val = Get_System(SYS_LOCALE, LOCALE_LANGUAGE_P);`
`842`	`843`	`Set_String(val, Copy_OS_Str(data, (REBINT)LEN_STR(data)));`
	`844`	`+ OS_FREE(data);`
`843`	`845`	`}`
`844`	`846`
`845`	`847`	`if (NZ(data = OS_GET_LOCALE(2))) {`
`846`	`848`	`val = Get_System(SYS_LOCALE, LOCALE_LOCALE);`
`847`	`849`	`Set_String(val, Copy_OS_Str(data, (REBINT)LEN_STR(data)));`
	`850`	`+ OS_FREE(data);`
`848`	`851`	`}`
`849`	`852`
`850`	`853`	`if (NZ(data = OS_GET_LOCALE(3))) {`
`851`	`854`	`val = Get_System(SYS_LOCALE, LOCALE_LOCALE_P);`
`852`	`855`	`Set_String(val, Copy_OS_Str(data, (REBINT)LEN_STR(data)));`
	`856`	`+ OS_FREE(data);`
`853`	`857`	`}`
`854`	`858`	`}`
`855`	`859`