Change TAddress to ByteAddress

This commit is contained in:
Andrey Sobolev
2015-09-14 11:51:21 +06:00
parent 2f6dc8c47f
commit 3be1267cbd

View File

@@ -164,9 +164,9 @@ elif stackIncreases:
proc isOnStack(p: pointer): bool =
var stackTop {.volatile.}: pointer
stackTop = addr(stackTop)
var a = cast[TAddress](gch.stackBottom)
var b = cast[TAddress](stackTop)
var x = cast[TAddress](p)
var a = cast[ByteAddress](gch.stackBottom)
var b = cast[ByteAddress](stackTop)
var x = cast[ByteAddress](p)
result = a <=% x and x <=% b
var