Ignore:
Timestamp:
Sep 14, 2009, 6:47:46 PM (11 years ago)
Author:
rme
Message:

When unwatching an object, allocate space for it from lisp rather than
from the kernel. Change UNWATCH, %UNWATCH, and unwatch_object()
accordingly.

In unwatch_object(), just tenure everything after unwatching.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-0/X86/X8632/x8632-utils.lisp

    r12797 r12837  
    402402  (single-value-return))
    403403
    404 (defx8632lapfunction %unwatch ((watched arg_z))
    405   (check-nargs 1)
     404(defx8632lapfunction %unwatch ((watched arg_y) (new arg_z))
     405  (check-nargs 2)
    406406  (movl ($ arch::watch-trap-function-unwatch) (%l imm0))
    407407  (uuo-watch-trap)
    408   (movl ($ nil) (%l arg_z))
    409408  (single-value-return))
    410409
Note: See TracChangeset for help on using the changeset viewer.