Changeset 9298


Ignore:
Timestamp:
Apr 26, 2008, 8:18:48 PM (11 years ago)
Author:
gb
Message:

Note beginning, end of spentry, subprims code (for "real" suspend/interrupt.)

Location:
branches/win64/lisp-kernel
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/win64/lisp-kernel/x86-spentry64.s

    r8962 r9298  
    4040       
    4141
    42 _spentry(bad_funcall)   
     42_spentry(bad_funcall)
     43Xspentry_start:         
    4344        .globl C(bad_funcall)   
    4445__(tra(C(bad_funcall)))
     
    50585059_endsubp(unused_5)
    50595060
    5060 _spentry(unused_6)
    5061         __(int $3)
    5062 _endsubp(unused_6)
    50635061
    50645062        __ifdef([DARWIN])
     
    51415139        __endif
    51425140       
     5141_spentry(unused_6)
     5142        __(int $3)
     5143Xspentry_end:           
     5144_endsubp(unused_6)
    51435145       
     5146        .data
     5147        .globl C(spentry_start)
     5148        .globl C(spentry_end)
     5149C(spentry_start):       .quad Xspentry_start
     5150C(spentry_end):         .quad Xspentry_end
     5151                       
  • branches/win64/lisp-kernel/x86-subprims64.s

    r8785 r9298  
    3030/*            (return nil))))*/
    3131
    32 
    3332_exportfn(toplevel_loop)
     33Xsubprims_start:               
    3434        __(push %rbp)
    3535        __(movq %rsp,%rbp)
     
    142142        __(leave)
    143143        __(ret)
     144Xsubprims_end:           
    144145_endfn
    145                
     146
     147        .data
     148        .globl C(subprims_start)
     149        .globl C(subprims_end)
     150C(subprims_start):      .quad Xsubprims_start
     151C(subprims_end):        .quad Xsubprims_end
     152        .text
     153                               
Note: See TracChangeset for help on using the changeset viewer.