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     ! 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.