[Openmcl-cvs-notifications] r11114 - /trunk/source/lisp-kernel/x86-asmutils32.s

[gb at clozure.com]

Author: gb
Date: Fri Oct 17 06:43:28 2008
New Revision: 11114

Log:
In restore_windows_context, remember to set tcr.valence!

Modified:
    trunk/source/lisp-kernel/x86-asmutils32.s

Modified: trunk/source/lisp-kernel/x86-asmutils32.s
=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/x86-asmutils32.s (original)
+++ trunk/source/lisp-kernel/x86-asmutils32.s Fri Oct 17 06:43:28 2008
@@ -189,6 +189,7 @@
         __(movl 8(%esp),%eax)   /* tcr */
         __(movw tcr.ldt_selector(%eax), %rcontext_reg)
         __(movl 4(%esp),%ecx)   /* context */
+        __(movl %edx,rcontext(tcr.valence))
         __(movl $0,rcontext(tcr.pending_exception_context))
         __(frstor win32_context.FloatSave(%ecx))
         /* Windows doesn't bother to align the context, so use