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

tiny C support; cosmetic improvements for the docs

Browse source
This commit is contained in:
Araq 2010-08-28 22:33:07 +02:00
commit 47886978c7
151 changed files with 63611 additions and 43 deletions
Download patch file Download diff file Expand all files Collapse all files

16
lib/system/gc.nim
View file

@ -487,14 +487,14 @@ when not defined(useNimRtl):
stackBottom = cast[pointer](max(a, b))
proc stackSize(): int {.noinline.} =
var stackTop: array[0..1, pointer]
result = abs(cast[int](addr(stackTop[0])) - cast[int](stackBottom))
var stackTop {.volatile.}: pointer
result = abs(cast[int](addr(stackTop)) - cast[int](stackBottom))
when defined(sparc): # For SPARC architecture.
proc isOnStack(p: pointer): bool =
var stackTop: array [0..1, pointer]
var stackTop {.volatile.}: pointer
var b = cast[TAddress](stackBottom)
var a = cast[TAddress](addr(stackTop[0]))
var a = cast[TAddress](addr(stackTop))
var x = cast[TAddress](p)
result = x >=% a and x <=% b
@ -522,9 +522,9 @@ elif stackIncreases:
# Generic code for architectures where addresses increase as the stack grows.
# ---------------------------------------------------------------------------
proc isOnStack(p: pointer): bool =
var stackTop: array [0..1, pointer]
var stackTop {.volatile.}: pointer
var a = cast[TAddress](stackBottom)
var b = cast[TAddress](addr(stackTop[0]))
var b = cast[TAddress](addr(stackTop))
var x = cast[TAddress](p)
result = x >=% a and x <=% b
@ -549,9 +549,9 @@ else:
# Generic code for architectures where addresses decrease as the stack grows.
# ---------------------------------------------------------------------------
proc isOnStack(p: pointer): bool =
var stackTop: array [0..1, pointer]
var stackTop {.volatile.}: pointer
var b = cast[TAddress](stackBottom)
var a = cast[TAddress](addr(stackTop[0]))
var a = cast[TAddress](addr(stackTop))
var x = cast[TAddress](p)
result = x >=% a and x <=% b