Return to swap.s.68k CVS log

Up to [Research Unix] / researchv10no / cmd / cfront / libC / otask

Annotation of researchv10no/cmd/cfront/libC/otask/swap.s.68k, revision 1.1.1.1

1.1       root        1: | Assembly support for SUNs.
                      2: |
                      3: | HISTORY
                      4: |  8-Apr-86  Rafael Bracho (rxb) at Schlumberger Palo Alto Research
                      5: |      Created.
                      6: |  13-Feb-87  Jonathan Shopiro (shopiro) at AT&T Bell Labs
                      7: |      Fixed sswap.
                      8: |  17-Nov-87  Jonathan Shopiro (shopiro) at AT&T Bell Labs
                      9: |      Removed sswap.  replaced the return sequence with that from task::task()
                     10: |      and sched::schedule()
                     11: |
                     12: 
                     13: | TFRAME is the displacement of t_frame in the task class.
                     14: TFRAME = 20
                     15: 
                     16: | TH is the displacement of th in the task class.
                     17: TH = 24
                     18: 
                     19:        .text
                     20:        .globl  _swap
                     21: _swap:
                     22:        movl    sp@(4),a0               | a0 = this
                     23:        movl    a0@(TFRAME),a6          | a6 (fp) = this -> t_framep
                     24:        movl    a0@(TH),d0              | return this -> th
                     25:        moveml  a6@(-0x2c),#0x3cfc      | size of frame from task__ctor and sched_schedule
                     26:        unlk    a6
                     27:        rts
                     28: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.