[Openmcl-cvs-notifications] r13883 - /trunk/source/level-0/X86/x86-utils.lisp

[gb at clozure.com]

Author: gb
Date: Thu Jun 24 09:30:12 2010
New Revision: 13883

Log:
No args to x8664 GET-GC-NOTIFICATION-THRESHOLD.

Modified:
    trunk/source/level-0/X86/x86-utils.lisp

Modified: trunk/source/level-0/X86/x86-utils.lisp
=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/level-0/X86/x86-utils.lisp (original)
+++ trunk/source/level-0/X86/x86-utils.lisp Thu Jun 24 09:30:12 2010
@@ -487,10 +487,10 @@
   (restore-simple-frame)
   (jmp-subprim .SPmakeu64))
 =

-(defx86lapfunction get-gc-notification-threshold ((threshold arg_z))
+(defx86lapfunction get-gc-notification-threshold ()
   "Get the value of the kernel variable that can be used to trigger
 GC notifications."
-  (check-nargs 1)
+  (check-nargs 0)
   (movq ($ arch::gc-trap-function-set-gc-notification-threshold) (% imm0))
   (uuo-gc-trap)
   (jmp-subprim .SPmakeu64))