anchor.diff:    (setf (physical-memref-unsigned-byte-64 (+ physical-address +ap-bootstrap-real-pml4-offset+))
           (sys.int::%cr3))
     (setf (physical-memref-unsigned-byte-64 (+ physical-address +ap-bootstrap-initial-pml4-offset+))
  -        initial-pml4))
  +        initial-pml4)
  +  ;; Make sure other CPUs see the trampoline before they receive INIT.
  +  (%wbinvd))
   
   (defun lapic-setup ()
     (setf (lapic-reg +lapic-reg-spurious-interrupt-vector+) #x1FF))
  
positive.code:                                    (ash 1 1) ; MP
                                     (ash 1 5) ; NE
                                     (ash 1 16))) ; WP
    (sys.lap-x86:movcr :cr0 :eax)
    ;; Clear EFLAGS.
    (sys.lap-x86:push 0)
  
negative.code:   ;; properly. Liberal use of address-size-override and 32-bit addressing
    ;; modes are required in 16-bit code.
    (sys.lap-x86:!code16)
    (sys.lap-x86:wbinvd)
    ;; Unify segments.
    ;; All memory access must be relative to CS until in 64-bit mode.
    (sys.lap-x86:movseg :bx :cs)
  