mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-26 21:20:30 +02:00
Code Activity

Properly correct read of freed memory

Browse source
This commit is contained in:
pcpa 2015-03-08 16:22:10 -03:00
parent 20955b2bfc
commit 1507bc7ee5
3 changed files with 17 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/lightning.c
View file

@ -832,6 +832,13 @@ jit_new_state(void)
void
_jit_clear_state(jit_state_t *_jit)
{
#if DEVEL_DISASSEMBLER
# define jit_really_clear_state() _jit_really_clear_state(_jit)
}
void _jit_really_clear_state(jit_state_t *_jit)
{
#endif
jit_word_t offset;
jit_function_t *function;
@ -889,6 +896,9 @@ _jit_clear_state(jit_state_t *_jit)
void
_jit_destroy_state(jit_state_t *_jit)
{
#if DEVEL_DISASSEMBLER
jit_really_clear_state();
#endif
if (!_jit->user_code)
munmap(_jit->code.ptr, _jit->code.length);
if (!_jit->user_data)