[Openmcl-cvs-notifications] r11328 - /trunk/source/lisp-kernel/thread_manager.c

[gb at clozure.com]

Author: gb
Date: Sun Nov  9 17:24:14 2008
New Revision: 11328

Log:
In setup_tcr_extra_segment() for X8632 FreeBSD: helps to set sd.sd_hibase,
too.

Modified:
    trunk/source/lisp-kernel/thread_manager.c

Modified: trunk/source/lisp-kernel/thread_manager.c
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/lisp-kernel/thread_manager.c (original)
+++ trunk/source/lisp-kernel/thread_manager.c Sun Nov  9 17:24:14 2008
@@ -1114,6 +1114,7 @@
   sd.sd_lolimit =3D (size - 1) & 0xffff;
   sd.sd_hilimit =3D ((size - 1) >> 16) & 0xf;
   sd.sd_lobase =3D addr & ((1<<24)-1);
+  sd.sd_hibase =3D (addr>>24)&0xff;
   sd.sd_type =3D 18;
   sd.sd_dpl =3D SEL_UPL;
   sd.sd_p =3D 1;