Fix MSVC compilation

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

View file

@ -66,7 +66,7 @@ HDIR = $(top_srcdir)\h
HFILES = ..\ecl\config.h ..\ecl\atomic_ops.h $(HDIR)\ecl.h $(HDIR)\ecl-cmp.h\
$(HDIR)\object.h $(HDIR)\cs.h $(HDIR)\stacks.h\
$(HDIR)\external.h $(HDIR)\cons.h $(HDIR)\legacy.h\
$(HDIR)\number.h $(HDIR)\page.h
$(HDIR)\number.h $(HDIR)\page.h \
$(HDIR)\internal.h $(HDIR)\ecl-inl.h $(HDIR)\bytecodes.h \
$(HDIR)\impl\math_dispatch.h

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