replaced the direct reference to process.stackBottom (does not exist on all platforms)

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7494 8c9fc860-2736-0410-a75d-ab315db34111

source/WMProcessInfo.Mod

@@ -577,7 +577,7 @@ END GetAlign;
 PROCEDURE CheckBP( p: Objects.Process; bp: ADDRESS ): ADDRESS;
 VAR n: ADDRESS;
 BEGIN
-	IF (bp < p.stackBottom) & (bp > p.stackBottom - 256*1024) THEN
+	IF (bp < Objects.GetStackBottom(p)) & (bp > Objects.GetStackBottom(p) - 256*1024) THEN
 		SYSTEM.GET(bp, n);
 		IF ODD(n) THEN INC(bp, SIZEOF(ADDRESS)) END;
 		RETURN bp

source/Win64.Objects.Mod

@@ -147,7 +147,7 @@ TYPE
 		currPri: LONGINT;
 		stack*: Machine.Stack; (** user-level stack of process *)
 		*)
-		stackBottom-: ADDRESS;
+		stackBottom: ADDRESS;
 		handle-: Kernel32.HANDLE; (* handle to corresponding Windows thread *)
 		body: Body;
 		event: Win32Event;