[Openmcl-cvs-notifications] r10920 - /trunk/source/lisp-kernel/x86-asmutils64.s

[gb at clozure.com]

Author: gb
Date: Tue Sep 30 06:35:11 2008
New Revision: 10920

Log:
add windows_halt, which we should never reach (just need a return address
to push somewhere ...)

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

Modified: trunk/source/lisp-kernel/x86-asmutils64.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-asmutils64.s (original)
+++ trunk/source/lisp-kernel/x86-asmutils64.s Tue Sep 30 06:35:11 2008
@@ -286,5 +286,9 @@
 C(restore_windows_context_iret): .quad Xrestore_windows_context_iret
 =

         __endif
-                =

+
+/* Something that we shouldn't return to */
+_exportfn(C(windows_halt))
+        __(hlt)
+_endfn                                =

 	_endfile