jyapayne/Nim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

attempt to fix #183

Browse source
This commit is contained in:
Araq 2012-10-06 22:46:41 +02:00
commit 70fa5a6df0
3 changed files with 16 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/system/alloc.nim
View file

@ -17,8 +17,9 @@
# some platforms have really weird unmap behaviour: unmap(blockStart, PageSize) # some platforms have really weird unmap behaviour: unmap(blockStart, PageSize)
# really frees the whole block. Happens for Linux/PowerPC for example. Amd64 # really frees the whole block. Happens for Linux/PowerPC for example. Amd64
# and x86 are safe though: # and x86 are safe though; Windows is special because MEM_RELEASE can only be
const weirdUnmap = not (defined(amd64) or defined(i386)) # used with a size of 0:
const weirdUnmap = not (defined(amd64) or defined(i386)) or defined(windows)
when defined(posix): when defined(posix):
const const
@ -75,7 +76,10 @@ elif defined(windows):
# This means that the OS has some different view over how big the block is # This means that the OS has some different view over how big the block is
# that we want to free! So, we cannot reliably release the memory back to # that we want to free! So, we cannot reliably release the memory back to
# Windows :-(. We have to live with MEM_DECOMMIT instead. # Windows :-(. We have to live with MEM_DECOMMIT instead.
when reallyOsDealloc: VirtualFree(p, size, MEM_DECOMMIT) # Well that used to be the case but MEM_DECOMMIT fragments the address
# space heavily, so we now treat Windows as a strange unmap target.
when reallyOsDealloc: VirtualFree(p, 0, MEM_RELEASE)
#VirtualFree(p, size, MEM_DECOMMIT)
else: else:
{.error: "Port memory manager to your platform".} {.error: "Port memory manager to your platform".}

5
tests/compile/mdefaultprocparam.nim Normal file
View file

@ -0,0 +1,5 @@
proc p*(f = (proc(): string = "hi")) =
echo f()

4
tests/compile/tdefaultprocparam.nim Normal file
View file

@ -0,0 +1,4 @@
import mdefaultprocparam
p()