[Openmcl-cvs-notifications] r10083 - /trunk/source/lisp-kernel/bits.h

[rme at clozure.com]

Author: rme
Date: Fri Jul 18 13:42:15 2008
New Revision: 10083

Log:
current_stack_pointer() for x8632.

Modified:
    trunk/source/lisp-kernel/bits.h

Modified: trunk/source/lisp-kernel/bits.h
=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/bits.h (original)
+++ trunk/source/lisp-kernel/bits.h Fri Jul 18 13:42:15 2008
@@ -124,6 +124,9 @@
 #ifdef X8664
   register natural _sp __asm__("%rsp");
 #endif
+#ifdef X8632
+  register natural _sp __asm__("%esp");
+#endif
   return _sp;
 }
 #else