bite the bullet and make 'initStackBottom' a compilerproc

This commit is contained in:
Araq 2012-06-24 20:00:25 +02:00
commit ee98c76d2e
3 changed files with 18 additions and 16 deletions

View file

@ -1680,11 +1680,11 @@ when not defined(EcmaScript) and not defined(NimrodVM):
when not defined(boehmgc) and not defined(useMalloc):
proc initAllocator() {.inline.}
when not defined(nogc):
proc initStackBottom() {.inline.} =
# WARNING: This is very fragile! An array size of 8 does not work on my
# Linux 64bit system. Very strange, but we are at the will of GCC's
# optimizer...
proc initStackBottom() {.inline, compilerproc.} =
# WARNING: This is very fragile! An array size of 8 does not work on my
# Linux 64bit system. Very strange, but we are at the will of GCC's
# optimizer...
when defined(setStackBottom):
var locals {.volatile.}: pointer
locals = addr(locals)
setStackBottom(locals)

View file

@ -639,6 +639,7 @@ when not defined(useNimRtl):
else:
var a = cast[TAddress](theStackBottom) # and not PageMask - PageSize*2
var b = cast[TAddress](gch.stackBottom)
#c_fprintf(c_stdout, "old: %p new: %p;\n",gch.stackBottom,theStackBottom)
when stackIncreases:
gch.stackBottom = cast[pointer](min(a, b))
else: