Changeset 7896


Ignore:
Timestamp:
Dec 12, 2007, 10:28:01 AM (13 years ago)
Author:
gb
Message:

Revert eep.adress to old (anchored UUO out-of-line) behavior, since
the bug in the kernel's ability to resart anchored UUOs should be
fixed now.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/compiler/X86/X8664/x8664-vinsns.lisp

    r7867 r7896  
    36723672  (:anchored-uuo (uuo-error-slot-unbound (:%q dest) (:%q instance) (:%q index))))
    36733673
    3674 #||
    36753674(define-x8664-vinsn eep.address (((dest t))
    36763675                                 ((src (:lisp (:ne dest )))))
     
    36833682  :bad
    36843683  (:anchored-uuo (uuo-error-eep-unresolved (:%q src) (:%q dest))))
    3685 ||#
    3686 
    3687 (define-x8664-vinsn eep.address (((dest t))
    3688                                  ((src (:lisp (:ne dest )))))
    3689   (movq (:@ (+ (ash 1 x8664::word-shift) x8664::misc-data-offset) (:%q src))
    3690         (:%q dest))
    3691   (cmpb (:$b x8664::fulltag-nil) (:%b dest))
    3692   (jne :ok)
    3693   (uuo-error-eep-unresolved (:%q src) (:%q dest))
    3694   :ok)
     3684
    36953685
    36963686(define-x8664-subprim-lea-jmp-vinsn (heap-cons-rest-arg) .SPheap-cons-rest-arg)
Note: See TracChangeset for help on using the changeset viewer.