Changeset 6335


Ignore:
Timestamp:
Apr 22, 2007, 12:20:48 PM (15 years ago)
Author:
gb
Message:

ESTABLISH-FN, XCALL-SUBPRIM.

File:
1 edited

Legend:

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

    r6324 r6335  
    997997  (jmp (:@ spno))
    998998  :back
     999  (leaq (:@ (:^ entry) (:% x8664::rip)) (:%q x8664::fn)))
     1000
     1001(define-x8664-vinsn (xcall-subprim :call)  (()
     1002                                           ((spno :s32const))
     1003                                           ((entry (:label 1))))
     1004  (:talign 4)
     1005  (call (:@ spno))
    9991006  (leaq (:@ (:^ entry) (:% x8664::rip)) (:%q x8664::fn)))
    10001007
     
    42294236  (xchgq (:%q a) (:%q b)))
    42304237
     4238(define-x8664-vinsn establish-fn (()
     4239                                  ()
     4240                                  ((entry (:label 1))))
     4241  (leaq (:@ (:^ entry) (:% x8664::rip)) (:%q x8664::fn)))
     4242                                 
    42314243(queue-fixup
    42324244 (fixup-x86-vinsn-templates
Note: See TracChangeset for help on using the changeset viewer.