mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-04-29 12:51:03 -07:00
Code Issues Projects Releases Packages Wiki Activity

Fix MSVC compilation

Browse source
This commit is contained in:
Fabrizio Fabbri 2016-05-12 13:02:56 -04:00
parent af72e2b293
commit 5f032e2dfa
2 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/c/main.d
View file

@ -201,7 +201,7 @@ _ecl_dealloc_env(cl_env_ptr env)
ecl_internal_error("Unable to deallocate environment structure.");
#else
# if defined(ECL_USE_GUARD_PAGE)
if (VirtualFree(env, sizeof(*env), MEM_RELEASE))
if (!VirtualFree(env, sizeof(*env), MEM_RELEASE))
ecl_internal_error("Unable to deallocate environment structure.");
# endif
#endif